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cientes conocimientos de la técnica de programación, quieres ir 
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СОМЮ 


USAR EL 
MICRODRIVE 


on el atractivo y ambiguo 
nombrede microdrive, Sinclair 
lanzó definitivamente al mer- 
cado una unidad de almace- 
ШЕШ лсо de datos para cl 
Spectrum a finales del año pasado 
Las previsiones de ventas quedaban 
claras en el anuncio de la famosa 
empresa en Inglaterra: “Se entrega- 
rán de acuerdo a la fecha de compra 
de los Spectrums y no más de dos 
unidades por persona". Aquí, como 
siempre, tuvimos que esperar más. ^ 
finales de mayo de año salía 
definitivamente a la venta a un precio 
poco asequible para los jóvenes usua- 
rios del Spectrum 
Para poder utilizarlo, como ocurre 
con los jovstick y cualquier periférico 
en general. necesita de un interface. 
Sinclair creó especialmente el interfa- 
ce | para este propósito, pero no es 
ésta su única característica. Conviene. 
pues, analizar por separado ambos 
productos que podrá igualmente 
adquirir por separado (lógicamente 
sólo necesitará un interface pero pue- 
de disponer de varios microdrives) 


este 


EL MICRODRIVI 


Cada microdrive puede albergar 
una pequeña cinta de las denomina- 
das “sin fin". La capacidad de esta 
cinta es de 100 K sin formatear, que 
se quedan aproximadamente en 80 
una vez formateada (operación que 
requiere treinta segundos). El tiempo 
medio de acceso es de 3,5 segundos. 
El número máximo de unidades que 
se pueden conectar es de ocho, por lo 
que se puede disponer de algo más de 
640 K accesibles de forma inmediata, 
pero no simultánea. Al igual que con 


el cassette. puede intercambiar cintas 
para disponer de mayores capaci- 
dades 

Las ventajas respecto al cassette 
son claras: mayor capacidad y rapi- 
dez en el acceso a la información. 
Pero dista mucho de tener las posibi- 
lidades de un disco. Permite trabajar 
con archivos de datos. pero ünica- 
mente del tipo secuencial: no existen 
registros. En suma, no olvide que es 
una cinta a pesar de su nombre 

Para grabar programas es ideal por 
su rápida grabación y localización 
También existe la posibilidad de pedir 
el catálogo de los programas o archi- 
vos contenidos en una cinta, indican- 


FICHA 


() MICRODRIVE 

— Número máximo de unidades a 
conectar simultáneamente, 8 

— Tiempo medio de acceso a la 
información, 3,5 seg 

— Precio, 19.500 ptas. 


() CINTA 

— Longitud. 15 metros 

— Capacidad, 85 К 

— Número máximo 
50 

— Precio. 1.650 ptas 

() INTERFACE 1 

— Salida expansión 

— Salida para red de 
(hasta 64 Spectrums). 

— Salida RS232 

— Controlador 
8). 

— Precio 


de archivos. 


área local 


microdrive (hasta 


19.500 ptas 


do el nombre de la cinta, información 
contenida en ella y espacio disponible 
en K. Para trabajar con archivos de 
datos es igualmente útil, siempre que 
la grabación se realice en bloque, es 
decir, de una sola vez: de lo contrario 
perderá mucho tiempo. Ello es debi- 
do a que no se puede grabar sobre un 
archivo ya creado, por lo que toda 
actualización de datos implica la 
creación de un nuevo archivo para 
pasar los datos antiguos, añadir los 
nuevos y eliminar el anterior archivo. 
Como se puede ver. sustancialmente 
distinto al funcionamiento de un dis- 
co. Cada cinta puede almacenar 50 
archivos como máximo. 

El motor de arrastre de la cinta 
sólo entra en funcionamiento cuando 
se hace uso de ella, indicándolo con el 
encendido de un diodo LED. De esta 
forma se evitan problemas de calen- 
tamiento. La cinta sólo se podrá 
introducir o extraer cuando el diodo 
esté apagado, recomendándose colo- 
carla una vez conectado el Spectrum 
a la alimentación y retirándola antes 
de su desconexión de la red 

No obstante, es un gran avance 
comparado con el cassette y a buen 
precio comparado con los discos, 
clave de todos los productos Sinclair 
(un microdrive cuesta 19.500 pesetas y 
el interface otras 19.500 pesetas). El 
precio de una unidad de discos no 
baja de 80.000 pesetas. Sin embargo, 
las cintas resultan demasiado caras: 
1650 frente a las 500 pesetas. de los 
convencionales discos de cinco pul- 
gadas, amén de su enorme desgaste 
que le obligará a constantes copias de 
sus datos para evitar su pérdida. 
Aunque se habla de 5000 accesos 
mínimos, la práctica ha demostrado 
una duración menor 


| 


Sinclair ha prometido lanzar soft- 
rare utilizando esta unidad de alma 
cenamiento, especialmente aplicacio- 
nes profesionales. Si pensamos que el 
nuevo ordenador de Sinclair (QL o 
quantum leap) utiliza este mismo sis- 
ema es fácil esperar desarrollos fu- 
juros. 


INTERFACE 1 


El diseño del interface | es particu- 
larmente atractivo al ajustar perfec- 
tamente en la ranura de expansión y 
elevar el ángulo del teclado para 
trabajar más cómodamente. Dos tor- 
nillos en la parte inferior permiten 
una segura fijación. Por la parte 
posterior dispone de una ranura de 
expansión, red local y salida RS232. 
En el lado izquierdo encontramos un 


nuevo port control de los 
microdrives. 

La ranura de expansión permite la 
adición de otros periléricos( jovstick 
impresoras...). Con la salida RS232 
ya es posible la conexión directa a 
todos los periféricos que utilicen este 
sistema, especialmente las impreso- 
ras. Pero lo más destacable son los 
dos conectores situados a la altura del 
EAR y MIC del Spectrum, que hacen 
posible que esté conectado con otros 
Spectrums (Local Area Network). has- 
ta un total de 64 y una distancia 
máxima de 100 metros. pudiéndose 
intercambiar información o acceder а 
determinadas unidades de almace- 
namiento (microdrives). 

^ diferencia de los tradicionales 
sistemas de redes, ésta no necesita que 
lodos sus componentes formen un 
círculo cerrado uniéndose el primero 
con el ültimo. Es más, las conexiones 


para el 


de entrada del primero y de salida del 
ültimo han de estar necesariamente 
libres. La ünica limitación estriba en 
que ningün ordenador integrado a la 
red puede desconectarse. Para poder 
utilizar la red, cada ordenador ha de 
tener un nümero de identificación, 
requiriéndose la interacción de los 
participantes (uno sólo no puede 
mandar nada si el otro no prepara la 
recepción). Es decir, que los partici- 
pantes han de estar cara a сага. Para 
enviar un programa se utilizarían las 
instrucciones 
FORMAT "^n": 
SAVE * "n"2 

El otro ha de preparar la entrada 
de la siguiente forma: 
FORMAT *n”:2 
LOAD * "n'l 
donde FORMAT indica el nümero de 
identificación y LOAD. la operación 
de carga del ordenador especificado 


Este concepto de redes, de canden- 
te actualidad para los microordena- 
dores, no parece ser de gran utilidad 
para el que nos ocupa. Suponemos que 
está dentro de la política de Sinclair 
de "dej sorprender", lanzando 
novedades al mercado y dejándole a 
éste que estudie su utilidad. Algunos 
ya ven en la red la posibilidad de 
utilizarla en las aulas, pero sus com- 
plicadas instrucciones de manejo no 
lo hace muy aconsejable. 


INSTRUCCIONES DE MANEJO 


Los comandos de referencia al 
microdrive están incluidas en el Spec- 
trum. Algunas son las ya utilizadas 
con el cassette (LOAD, SAVE, VE- 
RIFY y MERGE), aunque con pe- 
queños matices. Otras son totalmente 
nuevas (CAT, FORMAT, ERASE...). 
En gene-al, no resulta nada sencilla la 
utilización de los nuevos comandos, 
si bien en muchos casos se puede 
agilizar su uso mediante rutinas en las 
que lo único que varie sea el microdrive 


шин INTERFACE 1. VARIABLES DEL SISTEMA 


En el mapa de memoria del Spec- 
trum ya estaba previsto el entonces 
futuro INTERFACE | y MICRO- 
DRIVES. 


Los 58 bytes que ahora se incorpo- 
ran al mapa de memoria permiten las 
siguientes funciones: 


DECIMAL HEXADE NOMBRE FUNCION 


23734 SCB6 FLAGS3 Bit 0. Acti- 
vado utilizando elmodo extendido. 
Bit 1. Activado con CLEAR 4 
Bit 2. Activado cuando se modifica 

ERRSP. 


Bit 3. Activado con la Red Local. 
Bit 4. Activado con LOAD. 

Bit 5. Activado con SAVE. 

Bit 6. Activado con MERGE. 

Bit 7. Activado con VERIFY. 


23735 5CB7 VECTOR Expansión 
intérprete, normalmente 01F0. 


23737 SCB9 SBRT Acceso rutinas 
ROM 16 K de la forma: 
LD HL, valor 
CALL 
LD (5CBAH), HL 
RET 


a utilizar y el nombre del archivo con 
el que se va a trabajar. 

Veamos de forma resumida los 
nuevos comandos y la forma de 
utilizarlos, lo cual da una buena idea 
de las posibilidades reales del micro- 
drive. 

FORMAT “т”т: “Nombre”. For- 
matea una cinta virgen para poder ser 
utilizada o una ya utilizada para su 
reutilización (borrando toda la infor- 
mación). 

FORMAT “п7ух. Identifica el Spec- 
trum раға su uso еп la red. 

FORMAT “tx. Identifica la velo- 
cidad de transmisión de datos en la red: 
50, 110, 300, 600, 1200, 2400, 4800, 
9600, 19200. 

SAVE *"m'";n; "Nombre". Alma- 
cena un programa. Se puede afiadir 
LINE XXXX para indicar, al igual 
que en el cassette la línea de comien- 
70. 


23747 5CC3 BAUD Velocidad trans- 
ferencia de datos en baudios. 
BAUD-(3500000/(26*código))—2 


23749 5CC5 NTSTAT Código para 
la red local (1-64). 


VERIFY *“т”;п; "Nombre". Ve- 
rifica la perfecta grabación. 

LOAD *"m":n: “Nombre”. Carga 
el programa. 


ERAS ;"Nombre". Elimi- 
na un programa o archivo. 
MERGE *'"m":n; "Nombre". 


Mezcla un programa de cinta con el 
que se encuentra en memoria. 
CAT n. Catálogo de programas y 
archivos contenidos en la cinta. 
OPEN x."m".n, "Nombre". Abre 
un archivo de datos, utilizando el 
buffer X (Cualquiera del 0 al 15). 
PRINT 4 x. Grabación de datos en el 
archivo especificado por el buffer X. 
INPUT + Lectura de datos del 
archivo especificado por el buffer X. 
CLOSE + x. Cierra el archivo especi- 
ficado por buffer X. & 


"m" Indicativo de operación con 

microdrive. 

n Microdrive con que se trabaja 
(la 8). 

x Buffer. 


23750 5ССо IOBORD Color de 
BORDER durante operaciones 
input/output. 

23751 5СС7 SER--FL Control 

RS232. El primer byte es un flag 
y el segundo un carácter. 


Variables 
del sistema 


| 


16384 


22528 


Información 
para canales 


| 


PROG 


ы Memoria < 
ао Atributos intermedia 
¡presentación visual | de la impresora 
23296 


Programa 
BASIC 


| 


23552 23734 


са 
БН 


VARS E. LINE 


| 


зр 


5ТКВОТ STKEND 


"Nombre" Nombre de la cinta, pro- 
grama o archivo. 


ERRORES DEL INTERFACE 


Cuando salió al mercado el Spec- 
trum ya iban incorporados los co- 
mandos a utilizar con el Interface 1 
lanta anticipación. necesaria si se 
tiene en cuenta la estructura de este 
ordenador, puede originar pequeños 
problemas en el uso de los comandos. 
pudiéndose encontrar con un funcio- 
namiento anómalo 

Veamos cuáles pueden ser estos 
pequeños fallos: 


І. ERRORES DE SINTAXIS 
Hay una serie de comandos que en 
principio son aceptados, pero no ob- 


tendrá una respuesta adecuada al 
ordenador. Veamos estos comandos: 

ERASE “nombre” Ej: ERASE 
“PRUEBAS 

MOVE “nombre”. “nombre”. Ej. 
MOVE STI “Т? 

FORMAT "nombre . Ej: FOR- 
MAT "PRUEBAS 

CAT. Ej.: CAT (sin número) 


2. COMANDOS DE COLOR 
Utilizar canales distintos del “K”. 
“57, UP" puede afectar a los coman- 
dos de color con los que se trabaje 
posteriormente. El problema reside 
en las operaciones de output del 
inrerface que alteran el carácter per- 
manente de los comandos de color, 


3. COMANDO BREAK 

Detener la ejecución de un pro- 
grama по es tan sencillo con el iner- 
face. Si está trabajando con el micro- 
drive о con la salida RS232. deberá 
presionar CAPS SHIFT y la barra 
espaciadora simultáneamente. 5і орс- 
га con la red local у con la entrada 
RS232 bastará con presionar la tecla 
espaciadora 


4. OPERACIONES CON 
CASSETTI: 

Si se hace una incorrecta referencia 
a un archivo (por ejemplo. mås de 
diez caracteres de longitud). en vez de 
aparecer el mensaje de error INVA- 
LID FILENAME se quedará sor- 
prendido cuando aparezca en panta- 
lla NONSENSE IN BASIC 


TOR Control Mi- 
Sectores desde FFH a 


23753 5СС9 5 
crodrive. 


04ЕВН. 


23755 5ССВ CHADD- Almacena- 
miento temporal para CHADD 
mientras se chequea la sintaxis 
de las líneas. 


23757 SCCD NTRESP Código res- 
puesta de la red local. 
23758 5ССЕ NTDEST Inicio del 


buffer de la red, incluyéndose el 
código de Spectrum 


23759 5CCF NSTSRCE Código ori- 
gen de la red local. 


23760 SCDO NTNUMB Código 
bloque de la red local (0-65535). 


23762 5CD2 NTTYPE Control red 
local (0—datos, 1—Fin de archivo). 


23763 5CD3 NTLEN Longitud blo. 
que de datos red (0-255). 


23764 5CD4 NTDCS Chequeo blo- 
que de datos red. 


23765 5CD5 NTHCS Chequeo red 
(NTDEST-NTDCS). 


23766 5С)6 D--STRI Primer byte 
direccionamiento. Control drive, 
código microdrive 

(1-8), código red o código velocidad 

transmisión datos en baudios 


23768 5CD8 S--STRI Buffer (0-15) 


23769 5CD9 L- 


STRI 
cación: "M'. *М`. "7 


М. 


Tipo comuni- 
Го ‘B 


23770 5CDA N-STRI 
chivo. 


Longitud ar- 


23772 SCDC T-STRI 
chivo. 


Comienzo ar- 


23774 SCDE D-STR2 Segundo byte 
direccionamiento. Comandos MO- 
VE y LOAD. 


23782 5Ср6 HD--00 Direcciona- 
miento comandos SAVE, LOAD 
VERIFY y MERGE. 


Tipo datos: 0 programa. 
| — tabla numérica. 
2 — tabla alfanu- 

mérica. 

3 — bytes. 


23783 5СЕ7 HD-OB Longitud datos 
(0-65535) 


5. CODIGO MAQUINA 

Aunque la mayor parte de la ROM 
es correcto һау dos pequeños fallos: 
READ-N no puede utilizarse al si- 
tuarse el flag al final de la rutina y el 
«código 2B es el mismo que 22, debido 
а una incorrecta entrada en la tabla 
de bifurcación (Dirección X19C9H). 


6. LA SALIDA RS232 
Si se utiliza el canal “t 
listado de programas. se 


para el 
imprimirá 


un doble espacio entre las palabras 
clave. (THEN PRINT aparecerá co- 
mo THEN 


PRINT) 


Con unas dimensiones 
de 45 X 35 X 7 mm. el pequeño cartucho 
del microdrive contiene una banda 
continua de 15 т. cuya anchura 

es 1.9 mm. y puede llegar a 

almacenar entre 85 y 100 Kbytes. 


123785 5CE9 HD-OD Comienzo da- 
tos. (0-65535) 


23787 SCDB HD-OF 
grama. (0-65535) 


Longitud pro- 


23789 SCED HD-11 Linea de co- 
mienzo (ejecución automática). 


23791 SCEF COPIES Número de 
copias realizadas con SAVE. | 


después de SAVE. 
. 
23792 Comienzo ma- % 


pas microdrive. 


7. EL COMANDO CLOSE 9 

Si se Imterrumpe un programa con 
el comando BREAK mientras 
actuando el comando CLÓOSEZ, no se ! 
recuperará la memoria ішікі por 


trums simultáneamente es una de las 
novedades más importantes. pero so 
está bre todo más llamativas del Interface 


Cuando se trabaja con la red. se 


el buffer. Ello podria originar una abre un buffer en el área designada 
importante acumulación de memoria como CHANS еп el manual. nor- 
sin. utilizar normalmente direccionado por el re- 
RED LOCAL О LAN (Local Area — МО IX. La capacidad es de 


bytes y su contenido es el siguiente 


Network) 
1 posibilidad de conectar 64 Spec 


0 Dirección X 
Dirección Y 


4 `N 
COMO Бл dasla 


сп КОМ 


salida 
USAR EL 7 Dirección 


subrutina de 


de la subrutina de 


entrada en ROM 
MICRODRIVE 9 
— AA 


Dirección 276 
11 NCIRIS 


red 


Código de destino en 


NCSELF Código del Spec 

trum en la red 

13 NCNUMB Código de bloque 

15 CTYPE Tipo de datos 

16 NCOBL Número de bytes del 
bloque de datos 

17 NCDCS Chequeo datos 

ІК NCHCS Chequeo datos 

19 NCBL Dirección último ca 
rácter en el buffer 

20 NCB Número de bytes 
buffer 

21 Buffer de 225 bytes ^ 


RESUMIENDO 


Bajo el nombre de microdrive pue- 
de disponer de un sistema de almace- 
namiento intermedio en prestaciones 
y calidad a las cintas de cassette por 
un lado y los discos por otro. Además 
con la obligada colaboración del In- 
terface 1 nuestro ordenador se hace 
más interesante. Pudiéndose conectar 
hasta 64 Spectrums, el Interface I nos 
permite acceder a cualquier tipo de 
información que sea tratada por cual- 
quier ordenador conectado a la red 
Esta es sólo una de las mültiples 
ventajas del Interface, ya que seguida- 
mente tenemos una conexión RS232 
que permite conectar periféricos que 
utilicen este tipo de conexión espe- 
cialmente impresoras de más calidad 
que la pequeña ZX Printer. Final- 
mente, a la izquierda del Interface 
tenemos el port que controla 
microdrives, con la particularidad de 
que nos permite tener acceso hasta 8 
microdrives con una capacidad total 
de hasta 680k. lo que nos permite 
convertir a nuestro Spectrum en algo 
más que un ordenador personal 


los 


Las ventajas respecto al clásico | 
cassette son claras y permiten ya 
hablar de un sistema de almacena- 


miento rápido. flexible, suficiente y 
de bajo precio para este ordenador 
Como contrapartida, nos encontra 
mos con instrucciones de manejo 
excesivamente complicadas. un des- 
gaste excesivo de la cabeza de lectu- 
ra/escritura debido a la acción abi 
siva de la cinta y un precio elevado 
del cartucho y unas prestaciones muy 
inferiores a las de una unidad de 
discos convencional 


! di 
| П PROGRAMACION 


о | A FONDO 


. 7 
Í Inicializar 
- contadores Entrada 


Calculo 
escola 


eje "X 


4 


Calculo | 
valores “y” 
еп tobla 


i 
Moximos y 
minimos 
RNV 


imprimir 
cobeceras 


n esta sección nos proponemos cada mes 
E: un programa en profundidad. Partiendo 
siempre de un problema determinado. se analizará 
la forma en que puede resolverse por el ordenador 
Junto al listado del programa se incluirá el organigrama y 
su representación en pantalla 
En esta ocasión vamos a “profundizar” en el análisis 
de la representación gráfica de funciones. Un tema que 
esperamos sea del agrado de muchos, al poder llegar a i 
representar cualquier función 


Valores 


Calculo factor 
escalo pora 
ee "y" 


Problema 


El objetivo es construir un programa que realice la 
representación gráfica de varias funciones y=f(x), en el 
primer cuadrante (X e Y positivas) mostrando títulos y 
puntos de los ejes 

Distintas funciones requieren un INPUT o una linea 
que se cambie para cada función. La representación de 
titulos implica definir una área de graficación inferior al 
tamaño de la pantalla. Luego tendremos tres partes 

| diferenciadas: Ë 


1. Introducir una función. 

2. Introducir las variaciones de X e Y. 

3. Dibujar la gráfica. 

Los dos primeros puntos son relativamente sencillos. 
El trazado de la gráfica y los valores de los ejes de 
coordenadas es lo más complicado. Para trazar la gráfica 
podemos partir de una posición determinada (por ejem- 
plo. pixels Х-40, ). Obteniendo los valores de Y y 
almacenándolos en una tabla, puede pasarse a la pantalla 
mediante un factor de es DY=120/(Y2—Y 1), siendo 
Y2 e Yl los valores máximos y mínimos del eje Y. 
respectivamente. La posición en el eje X será (N(F)—Y 1) 
*DY + 52. siendo N(F) el elemento f-esimo de la tabla N 
correspondiente a un valor del eje Y. 

Se puede dividir en cuatro partes el eje Y. y en seis el eje 
X. Otras combinaciones son posibles, pero así se log: 
dividir la zona de graficación en cuadrados, haciéndose 
fácilmente visible la evolución de las curvas para los 
distintos valores introducidos. 

Para evitar complicaciones innecesarias se puede in- 
troducir los valores del eje y manualmente. Para ello. el 
ordenador debe indicar los valores mírimo y máximo. 
Asi, si estos valores fuesen 0.12 y 3.6. se podria elegir para 
el eje Y los valores 0. 1.5, 3.0 y 4.5. 


Tabla de variables 


Х5(6,4) Array valores eje X. 
Y$(4,5) Array valores eje Y. 
T$(4.25) Array títulos ejes y rótulo gráfico. 
М(50) Array valores calculados de Y. 

F Variable de bucle 

L Variable de bucle. 

F$ Función 
X Valor de 
MINX Valor minimo de X. 

MX Valor máximo de X. 

DX Incrementos de X. 

Y Valores de Y. 

MAXY Valor máximo de Y. 

MINY Valor mínimo de Y 

MS Opción elegida del menü. 

Y1 Valor mínimo del eje Y. 

Y2 Valor máximo del eje Y. 

DY Factor de escala para graficación. 


Resultado 


Para probar la validez del programa se puede empezar 
por una función conocida, como la función y=seno XX. 
DIBUJO 


ША 
B 


3, 19 
F 


SUB. NIVEL 
Y VARIANTE 


SUB 
GRAFICOS 
DEFI 


VARIABLES 
RELOJ 


SITUACION 
DENTRO DEL 
LABERINTO 


MOVIMIENTO 
DE LAS AGUJAS 
DEL RELOJ 


EL LIMITE DE 
MOVIMIENTOS 
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odavía һау muchos para 
los que el Spectrum es un 
sofisticiado juguete del des- 
ман arrollo tecnológico. Sofistica- 
do. pero juguete al fin x al 
cabo. * 
Nanoordenador, ordenador do- 
méstico о home computer. según la 
terminología anglosajona, son las di- 
versas denominaciones usadas para 
calificar a este ordenador. convertido 
en el regalo de fin de curso más 
preciado por las nuevas generaciones 
Hasta el momento. hemos asistido 
a una enorme proliferación de orde- 
nadores. evidenciándose una enorme 
laguna: el ordenador personal para 
aplicaciones “profesionales”. Sin du- 
da el nuevo QL de Sinclair pretende 
llenar ese campo. Mayores capacida- 
468, disco duro. BASIC más poten- 
te... а un precio igualmente inter- 
medio 


Pero quienes tienen un ordenador 
desde hace tiempo ya suben que el 
problema no está sólo en la compra 
de uno nuevo. sino en la pérdida del 
sofware del viejo. Es por ello que vale 
la pena resistir e intentar ampliar al 
máximo las capacidades del ordena- 
dor que, dicho sea de paso, rara vez 
entra dentro de la política de comer- 
cialización de las casas proveedoras. 


El microdrive constituye hasta el 
momento la ampliación más impor- 
tante al Spectrum, sobre todo la má 
conocida en nuestro país. pero no es 
la única. Desconocido en el mercado 
español. aparecieron en marzo del 83 
una serie de expansiones modulares 
bajo el nombre de Basicare. А pesar 
de sus enormes ventajas desconoce- 
mos si llegará a comercializarse en 
España. Veamos sus características 
más notables, objeto de este artículo. 

Basicare es una serie de módulos 
conectados entre sí por la parte su- 
perior e inferior de cada uno de ellos. 
Existen diversos módulos con dife- 
rentes posibilidades, de forma que el 
usuario construye —podríamos decir 
que edifica— su propio ordenador de 
acuerdo con sus necesidades. Gracias 
a este acople vertical se consigue un 
gran aprovechamiento de espacio y se 
evitan las conexiones por cable. 

Inicialmente se pensó en el ZX8l, a 
fin de potenciarle sus puntos más 
débiles (principalmente la escasa ca- 
pacidad de memoria). Pero el pro- 
yecto era más ambicioso y ofreciendo 
un procesador de 16 bit y el MSDOS 
(Microsoft Disk Operation System) se 
abría la puerta del abundante soft- 


ware del IBM/PC y sus clónicos. El 
ZX81 fue sólo el principio 

En junio del presente año ya estaba 
disponible para el Spectrum, llenando 
el vacío existente para aplicaciones 
serias”. 

Ocho son los módulos que se pue- 
den conectar: 


1. PERSONA 

“| solo no hace nada, pero tampo- 
co harian nada todos los demás sin él. 
pues su misión es establecer el bus de 
conexión para los demás módulos. En 
el caso de tener el Spectrum de 48K es 
necesario hacer un pequeño cambio. 
anulando las últimas 32k (si por error 
lo conecta directamente, es probable 
que no le ocurra ningún daño a su 
ordenador, pero no se lo aconseja- 


тов), por lo que resulta menos venta- 
joso para este equipo. 

Con este módulo se pueden con- 
trolar hasta cinco módulos adiciona- 
les, Para expansiones superiores а 
cinco módulos existe una expansión 
del propio módulo PERSONA. 


2. RAM 

Existen tres módulos de ocho, 16 y 
64K de memoria. Con ellos puede 
llegar hasta cuatro megabytes de 
memoria (1Mg=1.000k). Lógicamen- 
te, la configuración del Z80 no permi- 
te estos lujos directamente. Para ello 
ha de configurarse un módulo llama- 
do minimapa, que organiza la nremo- 
ria incorporada en tres grupos de 
memoria y cada grupo en segmentos. 
a fin de permitir su manipulación. 


4. 


Еп el primer grupo reside la ROM, 
que ha de estar presente para el 
procesador de forma constante. A los 
otros dos grupos de memoria se 
accede según las necesidades. El se- 


= === ——— ٠ س‎ 
Módulos de expansión de 
memoria de 8, 16 y 64K, 
pudiéndose llegar a 4 тева- 
bytes. 

т-ны 


gundo grupo contiene segmentos de 
32K donde residen los programas en 
BASIC. El tercer grupo tiene segmen- 
tos de 16К para ubicar programas en 
código máquina o rutinas en BASIC 


La figura 1 muestra el mapa de 
memoria y la interacción de los dis- 
lintos grupos 


La expansión de memoria tiene, 
por tanto, unas grandes limitaciones, 
ya que sólo trabaja con el límite de la 
RAMTOP, 32768 o direcciones infe- 
riores. Es decir, que programas de 
más de 16K no pueden utilizarse si 
está conectada la Basicare. La am- 
pliación de memoria resulta espe- 
cialmente interesante para la utiliza- 
ción de otros módulos, como el 
DROM o para almacenamiento di- 
verso, como puede ser diversas pan- 
tallas en cualquiera de sus zonas de 
memoria de 16K, pero no para reali- 
zar programas más complejos, sino 
todo lo contrario: deberá desconec- 


tarse Basicare para utilizar 


gramas de más de 16K 


pro- 


3. PERICON 

Este módulo dispone de tres puertas 
de 8 bits para operaciones de entrada 
de datos, presentando diversas moda- 
lidades. Así PERICON A permite 
potenciar la comunicación vía ports 
convertidas en simples direcciones de 
memoria accesibles por las instruc- 
ciones PEEK y POKE. PERICON B 
amplía el nümero de puertas. PERI- 
CON C es un interface Centronics 
con el que poder utilizar impresoras 
con las clásicas instrucciones LLIST, 
LPRINT, para campos de impresión 
de hasta 80 columnas y 66 líneas por 
página. 


4. DROM 

Uno de los más importantes módu- 
los, con el que dispondrá de 8K de 
memoria permanente ROM para ru- 
tinas propias. Rutinas de impresión, 
utilities, etc., todos accesibles inme- 
diatamente 

Junto con el módulo se incluyen 
unis rutinas interesantes: auto enume- 
ración de las líneas del lenguaje BA- 
SIC, un comando RESET en código 
máquina, y una rutina de lectura del 
módulo del reloj (CLOCK) que asig- 
na los valores relativos a la fecha y 
tiempo, en la variable t$ (aunque ello 
presenta el inconveniente de su elimi- 
nación de memoria con cada RUN o 
CLEAR que se efectüa, necesitando 
hacer una posterior llamada al módu- 
lo del reloj). 


TOOLKIT 
Junto con el anterior, es uno de los 
módulos más interesantes. A las ruti- 


A s ي‎ =“ СЕА 
Diseño modular según sus 
necesidades. 

стан‏ ڪڪ rnIII‏ تڪ 


nas EPROM creadas se puede acceder 
directamente desde programa si se las 
guarda en este médulo que, al igual 
que el DROM, puede tener 8K. Como 
complemento al anterior es especial- 
mente útil, ya que se pueden desarro- 
llar y probar rutinas en DROM y 
después pasarlas al TOOLKIT, una 
vez verificado su correcto funciona- 
miento. 


6. LINK A 
La conversión analógico-digital, 
tan de moda para el control de 


aparatos domésticos, tiene aquí su 
módulo. La lectura se realiza media 
te las instrucciones PEEK y POKE. 

Cada módulo tiene ocho canales de 
comunicación. pudiendo conectarse 
un máximo de cuatro módulos. El 
voltaje debe estar comprendido entre 
cero y cinco positivo. pudiendo resul- 
tar dañado el ordenador si se aplican 
corrientes negativas о superiores а 
cinco voltios (¡cuidado con su es- 
téreo!). 


7. СЕОЕК: 

Se trata de un auténtico reloj con 
batería que ofrece los datos de tiempo 
y dia de la semana, mes y año, lectura 
y puesta en hora del reloj. Junto al 
módulo se suministra un cassette con 
dos programas para la lectura y 
puesta en hora del reloj. La bateria 


TOOLKIT 


PERICON A 


permite una autonomía de tres meses 
y se carga automáticamente. 


8. SONUS 

Módulo sintetizador de voz y gene- 
rador de sonido, cubriéndose el vacio 
sonoro impuesto por Sinclair. 

Segün cuáles sean sus necesidades, 
puede **montarse" su propio ordena- 
dor a la medida. Pero no se haga 
demasiadas ilusiones: con estos mó- 
dulos puede tener unas potentes 
herramientas pero sólo eso. Todo el 
trabajo lo tendrá que hacer usted, ya 
que no existe software por el momen- 
to a excepción de lo que hemos 
comentado suministrado con los mó- 


El hardware ya está hecho. 
El software es cosa suya. 


dulos. El hardware está ahí, el softwa- 
re requiere de profesionales que se 
aventuren con el Spectrum. Un solo 
ejemplo: basta un par de módulos 
para tener 64K, pero ¿ha visto en el 
mercado algún programa que necesite 
más de 48K? E incluso si se trata de 
un programa que necesita más de 16K 
no será factible por la técnica de 
"paginación" de la memoria en blo- 
ques de 16К, como hemos visto. 
Todo está por hacer, incluso por 
rehacer, como ocurre con los manua- 
les donde la diferencia en el uso de 
valores decimales-hexadecimales dis- 
ta mucho de estar clara o la explica- 
ción para su utilización por el orde- 
nador, no distinguiéndose en muchos 
casos entre el ZX81 o el Spectrum. 

Otro de los problemas a tener en 
cuenta es que el módulo PERSONA 
no tiene el port de expansión, por lo 
que no podrá incorporar otros perifé- 
ricos tales como jovstick o el interface 
<, pero sı ei interjace 1, соп lo que 
podrá seguir trabajando con el micro- 
drive, buen compafiero de Basicare, 
al añadirse la posibilidad de utilizar la 
Network y la salida RS232. 

En cualquier caso, una vez más la 
técnica dio el paso hacia adelante y 
ahora hay que alcanzarla. Valore sus 
necesidades y evalüe las ventajas e 
inconvenientes por si le es de interés. 


БХ 


Basicare: usted decide la 
“altura” de su Spectrum de acuerdo 
a sus necesidades. 


| 
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I. Bloque 
de memoria 


Segmento 4 
Programación 


BASIC 


Bloque Segmento 1 Segmento 2 

de memoria Programación Programa 
BASIC BASIC 
ок ок 


Segmento 3 
Programación 


BASIC 


Segmento 3 
Código máquina 
x programas 


Segmento 1 
Código máquina 
x programas 

BASIC 
l6 K 


Segmento 2 
Código máquina 
y programas 


BASIC 


31. Bloque 
de memoria 


Expansión de memoria, 17 direccionamiento se logra con una técnica de “paginación”, donde el procesador selecciona la página a leer 


SUSCRIBASE 
POR TELEFONO 


ж más fácil, 
ж más cómodo, 
ж más rápido 


Telf. (91) 733 79 69 


7 días por semana, 24 horas a su servicio 
SUSCRIBASE A 


de datos 
te máscaras 


odo programa requiere 
, generalmente de entrada de 
datos por pantalla. Para ello 
el Spectrum y el BASIC en 
general dispone de la instruc- 
ción INPUT con la que. sin dema- 
siadas complicaciones puede lograr 
su objetivo. Pero si es usted un 
perfeccionista, seguro que más de una 
vez ha pensado en la posibilidad de 
confeccionar una ficha de entrada de 
datos y realizar las anotaciones en los 
mpos al efecto diseñados en la 
ficha, es decir, en utilizar la técnica de 
"máscaras". Todo ello, lógicamente. 
a través de la pantalla de su televisor. 
Para lograr esto la instrucción IN- 
PUT no parece ayudar mucho, pues 
siempre efectüa la entrada de datos en 
la ültima línea de la pantalla. Por el 
contrario, la instrucción PRINT AT 
resuelve el problema a medias, ya que 
puede imprimir pero no leer datos. 
Pero no hemos de desesperarnos tan 
pronto, y confiar en la potente ins- 
trucción INKEYS$. Con ella se pueden 
leer datos sin que aparezcan en pan- 
talla y con la instrucción PRINT AT 
se puede representar los caracteres 
leidos allí donde queramos. 


18 DIM t 
): DIM est 


(99,22 
84:22) 
PRINT. 


THEN 8 
4Q 88 18 Corva. 
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Dicho así puede resultar demasia- 
do trivial y frustrante para el perfec- 
cionista que а buen seguro no se 
conformará con utilizar el INPUT 
Para realizar una auténtica máscara 
han de indicarse los campos de cada 
concepto: la posición donde empieza 
y termina о, lo que es lo mismo, las 
coordenadas iniciales y finales de X y 
la coordenada de Y 

También podemos indicar el tipo 
de datos del campo, pudiendo ser 
alfanumérico o numérico y. en este 
último caso. real o entero, con lo que 
evitar errores en la introducción de 
datos con oportunos mensajes o to- 
nos de error. 

En el programa adjunto se ilustra 
este procedimiento en la rutina que va 
de la línea 9000 a 9095. (Una nume- 
ración alta permite partir de las 
rutinas construidas para posterior- 
mente realizar el programa sin tener 
que repetir dichas rutinas). Las líneas 
10 a 5113 ünicamente sirven de ejem- 
plo de utilización de la rutina, que 
veremos a continuación en detalle. 

Las variables X9, T9, Y9 represen- 
tan las coordenadas del campo y K9 
el tipo de dato. Para controlar la 


CLS 


PLOT 95,187; PRAY 90,0 
Es ,&; "Codi 


к MES 


eg? көсе “ШЕТ (аа: GO SU 


posición dentro de un campo se 
utiliza la variable X8 que parte del 
valor de X9 y que podrá alcanzar 
como máximo el valor de T9, es decir, 
los valores de columna inicial y final, 
respectivamente. También sirve para 
retroceder (anular caracteres) sin re- 
basar el valor de X9. 

Entrando por la línea 9026 inicia- 
lizamos los valores de X8 y X$. que 
será la variable que contenga la in- 

n del campo T9-X9+1. 

La línea 9030 nos informa con el 
signo interrogación de la posición en 
que se introducen los datos, por 
efecto de la instrucción INKEYS de la 
siguiente línea. Una vez pulsada una 
te se comprueba varias cosas 

1. Si se ha pulsado ENTER. Е 
código ASCII de esta tecla es el 13 
La instrucción 9035 lo recono 
como fin de entrada de datos para ese 
campo. 

2. Si se ha pulsado la tecla CAPS 
SHIFT + 5: el retroceso, a fin de 
borrar caracteres escritos. Dicha tecla 
responde al código ASCII 8, con lo 
que se pasaría a la linea 9050, donde 
se comprueba que se puede retroceder 
(six8£x9) y se imprime un blanco 


Cambios 


ЕТ (ад: GO SU 


1425222222432452444 
аргезіоп mascara + 
ж жатат жатат аздан 


PRINT RT 0,12;"Biblio 


INK 
INK 
INK 
INK 


(carácter 32 en ASCII) para borrar la 
información. 

3. Si el tipo de dato es el correcto 
de acuerdo al valor de К9. 

— Si es un dato real (K9=1), por 
efecto de la línea 9060 sólo se admite 
la entrada de números y el signo 
menos (—). 

— Si el dato es entero (K9=2) sólo 
se admiten losnúmeros (línea 90-65). 

— Y si se trata de datos alfanumé- 
ricos (K9=3) son válidos todos los 
caracteres comprendidos entre el có- 
digo 32 y 164 ASCII (Línea 9070). 

Un dato incorrecto se imprime 
(línea 9084) y se pide un nuevo 
carácter, siempre que no se haya 
llegado al final del campo (x8=19). en 
cuyo caso se asigna el valor del 
campo a la variable x$ de forma 
automática sin necesidad de presio- 
nar ENTER. La rutina devuelve el 
valor X para datos numéricos (k9=1 
ó K9=2) y x$ para los alfanuméricos 
(K 


). 

Decíamos que entrábamos por la 
línea 9026 en vez de hacerlo por la 
9000. Asi se evita el paso por la 9015 y 
9020, cuyo objeto no es la introduc- 
ción de datos, sino la impresión de 


datos conocidos para los distintos 
campos. 

La utilización de esta rutina puede 
parecer algo engorroso al principio. 
Imaginemos que se desea guardar 
referencias de libros (código, título, 
autor y editor) tal y como se haría en 
cualquier biblioteca (el código podría 
servir para clasificar por materias). 
Las lineas 5000 а 5060 realizan la 
máscara, que nos servirá para todas 
las operaciones de actualización, es 
decir, para dar de alta nuevos libros, 
anularlos o efectuar cambios en sus 
datos. De idéntica forma las instruc- 


ciones 5070 a 5113 permiten introdu- 
cir datos en la máscara para su 
actualización. El control de los distin- 
tos tipos de actualización se realiza 
mediante la variable t.(=1 par altas: 
=2 para bajas; ага cambios). Así, 
si el valor de "t" = | se pueden 
introducir los datos en los distintos 
campos; si t— lo se pide el código 
para darlo de baja, y si 1-0 previa- 
mente se coloca en el campo su valor 
para después poder realizar los cam- 
bios oportunos. 

La ficha que se muestra es sólo un 
sencillo ejemplo. 


r 


од —  — RET RM RT y9,x9; INK 4;x: 00 
8882 PRINT RT V9 x9; ІМК 4;х8 
o7 REN ft 3848 LET Xecko! PASAT МТ 05е; x 
T х8ахӘә: LET x$»"" яғы 
5880 LET, x99: LET 19818; LET_v9 less PRINT RT y9,x8; Кан 1,0? 
"2: Г : ы 1 
: 031 LET kSsINKEYS: IF LEN (kg)* 
ENEMIES RETURN S безг пет PETNE 
5 90:.ЕТ::1Х9890::587:4983::ЕТ-К9 8235 IF Кё«СН86 (13) THEN PRINT 
5% ӘР t THEN GO SUB 9888: оо т En 8. (6) THEN 00 TO 
ЖОЦ sem Шина 
X84»x9 THEN LET х8ах8-1: 
yan LET x -4); 
nh P. HÊN 90 sus 9888: оо T y7 81:98:18: 508838) S BRINT AF 
X H Ls 
n CET xfwas(c): GO SUB 9020 8381 80 10 9880 20 TO 9030 
iu C gu ЕЕЕ 
P F м GO SUB 9288: Go T 1088) PNO ° То наа 
113 LET SUB 9020 9261 GÖ то 
$113 CET TORN 3885 8 16 
(58) THEN 
80444444444 9066 GO TO 
rada 44- 4 3852 IF кос 
REX NH и 
inicial. 9984 BRENT Я 
finals * HOME AE: 
anui СЕ 
Ex: HS utat 
Ци 3888 ES THEN LET x»URL x$ 


También para despertar- 
se puede resultar el Spec- 
trum de gran utilidad, 
siempre que tenga un sue- 
ño ligero, o en caso con- 
trario un sintetizador mu- 
sical. 

Como ya habrá adivina- 
do, con este programa 
puede conseguir que su 
Spectrum actúe como una 
verdadera alarma. Para 
ello, sólo ha de introducir 
el tiempo que ha de trans- 
currir hasta que suene la 
alarma (en horas y minu- 
tos). Para activarla basta 
con llenar a la rutina en 
código máquina: RAN- 
DOMIZE USR 65120. Al 
transcurrir el tiempo fija- 
do, el ordenador interrum- 
pirá lo que estuviese 
haciendo para tocar una 
breve melodía, al mismo 
tiempo que el borde de la 
pantalla se volverá rojo. 

Tenga en cuenta que la 
instrucción RANDOMIZE 
USR 65120 únicamente 
llama a la rutina para que 
se ejecute una vez. Cada 
vez que desee activar la 
alarma deber llamar a di- 
cha rutina. 


Comentario 


Cambia color del BORDER. 
Nümero de BEEPs. 
Guarda el valor de B. 23 


Carga A con la duración de la nota. 
Coloca A en el stack. 


Llama a la rutina de sonido. 
Segundo ВЕЕР. 


Recupera B y completa la nota. 


10 SLS : CLEAR 65119: RESTORE 


15 PRINT TAB 13;"Relog";TRB 5, 
FLRSH 1; "Сагдапао codigo maquin 


*20 LET sumsQ: LET ізі 
520 READ а: IF 45455 THEN GO TO 


РЕКЕ 66119%і 
Siro 200 
70 READ à: IF а›255 THEN GO TO 


; POKE 65128+i 
о TO 72 


5330, INPUT "Minutos?";m: РОКЕ 65 
ELI 

18 Ф PRINT "Error": LIST 9999: 5 
392 DATA 62,9,237,71,237,94,201 
ЕНЕ 
$10 DATA 255,68 254,255 254,0 4 
RT GO PIE 
D ROLE A: 

ó 4,0,40,8,61,50,252 

БОГ КӨНЕ” ЛЕН 
ЕТ IDE 
з72417251,221771221,71,437,56,19 


prender а programar еп 

BASIC es relativamente sen- 

cillo, lo cual no puede decirse 
mmm CC código máquina. Saber 

cómo trabaja el ordenador 
para паЫагіе en su propio lenguaje 
puede resultar un poco frustrante al 
principio. Por ello se suele empezar 
por averiguar el significado de esos 
PEEK y POKE que esporádicamente 
suelen aparecer en cualquier progra- 
ma. 

Unos se corren la voz... “¿sabes que 
el POKE 23692.255 evita el mensaje 
de SCROLL?” Otros, los más incau- 
tos, prefieren mirar el manual. cre- 
yendo que no hay nada mejor que un 
buen libro. Pero el manual de Sin- 
clair, ya se sabe, adolece de buenas 
explicaciones, como es el caso del 
capitulo de las variables del sistema 
que trataremos exhaustivamente en 
este artículo. 

De la dirección 23552 a la 23734 el 
Spectrum almacena una información 
muy valiosa que en muchos casos. y 
esto es lo importante, puede ser 
modificada 

Las variables del sistema son bytes 
en la memoria ROM del Spectrum 
que permiten al ordenador conocer 
los pasos que tiene que dar para 
ejecutar las Órdenes que se le han 
dado. La información de cómo la 
memoria del Spectrum está repartida 
se guarda en estas variables, de forma 
que el ordenador pueda acceder а 
ellos y actualizarlos siempre y cuando 
lo necesite. 

Se puede hacer uso de la informa- 
ción almacenada en estas direcciones, 


VARIABLES DEL SISTEMA ——— 


mediante su lectura o cambiándola 
para que el ordenador haga unas 
Operaciones que de otra forma no 
haría o para que lo haga con más 
facilidad 

No todas las variables pueden re- 
sultar útiles. Y por supuesto no todas 
se pueden cambiar. Algunas causarán 
un bloqueo del ordenador o simple- 
mente se ignorarán. Otras se pueden 
cambiar alegremente, pero sólo en 
circunstancias especiales y la mayoría 
se pueden variar. pero con unas 
condiciones y unas limitaciones muy 
estrictas. 

Veamos cuál es la información 
contenida en estas variables y cómo 
sacar el mayor provecho de ellas 


23552-23559 (KSTATE) 


Cuando el procesador se interrum- 
pe una de las tareas que tiene que 
hacer es barrer el teclado y almacenar 
el resultado de dicha lectura en la 
variable KSTATE. Los bytes tienen 
usos diversos y no todos se pueden 
utilizar por el programador. El pro- 
grama: 1 ilustrará lo que ocurre en los 
8 bytes de la variable KSTATE. 
Ejecütelo y pulse varias teclas para 
comprobar el efecto que causa el 
pulsar teclas individuales como 
SHIFT 

Los primeros 4 bytes de KSTATE 
tienen algo que ver con el “rwo key 
rollover". que permite pulsar una 
segunda tecla antes de que se suelte la 
primera. PEEK 23556 devuelve el 
código del comando o letra situada en 


la parte superior de una tecla pulsada. 
de manera que si se pulsa SIMBOL 
SHIFT A, se tendría el valor del 
código de la letra “A” y no el de “a” 
ni el de STOP. 

Esto puede ser útil cuando lo que 
interesa es teclear las opciones supe- 
riores de las teclas. 

El efecto de pulsar una tecla es 
temporal y dura solamente mientras 
se mantenga pulsada, El valor alma- 
cenado en la dirección 23556 pod 
ser 255, si no se ha pulsado tecla 
alguna en el momento de la interrup- 
ción. Para la tecla ENTER dará el 
valor de 13. Para la tecla SPACE dará 
el valor 33. y pulsando ambas teclas 
SHIFT simultáneamente, se obtendrá 
el valor 14. El programa 2 lo de- 
muestra 

23557 se utiliza para controlar el 
tiempo. previniendo así el contacto 
Intermitente de una tecla. 

23558 es el que controla el tiempo 
de pausa antes de que la tecla co- 
mience a repetirse y el tiempo de 
repetición una vez que la tecla empie- 
ce a repetirse. El retardo utilizado está 
almacenado en las variables del sis- 
tema encargadas expresamente de 


ello, que son las que están situadas en 


61/2 
59 contiene el código del último 


los bytes 23 
P 


carácter pulsado. Este depende de si 


la tecla SHIFT ha sido pulsada o no. 
Los números producidos son los 
mismos que si se hubiera puesto 
PRINT CODE INKEYS 
excepto que el resultado sería la 
última tecla pulsada y no la que se 
pulsa en el momento. Pruebe el pro- 


9 
O REM Scroll 
EEK 


40 PRINT a; TAs? 10;b;TAB 20; CHR 
i $ b AND b>3 
3 50 МЕХТ а 
50 60 TO 10 
3 Шинэхэн 
Programa num. 2 
12 LET asPEEK 23556 
| 20 РОКЕ 23692,0 
30 PRINT a,CHR$ a AND a>31 
| 4@ GO TO 18 
E Programa num. 3 
10 LET azPEEK 23559 
20 POKE_23592,0 
30 PRINT a,CHR$ a AND a>31 
49 GO TO 10 


Programa num. 4 


artO PRINT “Pulse una tecla ahor 
20 FOR azi TO зай 
30 NEXT a 
40 CLS 


su LET асРЕЕК 23560 
E RINT a: IF a>31 THEN PRINT 
c 


a 
70 GO TO 19 


grama 3. Ejecútelo y pulse varias 
teclas utilizando conjuntamente la 


tecla SHIFT 


del teclado y hay una tecla pulsada, el 
valor de esta variable se actualiza. 
Contiene el código de la ültima tecla 
pulsada 

Esta variable del sistema no hace 
nada que no se pueda conseguir con 


23560 (LASTK) 


Cada vez que se hace un barrido 


APOSTARIA A QUE LLUEVE 


la instrucción INKEYS. En el pro- 
grama 4 encontrará que si se pulsa 
una tecla cuando se lo indique el 
ordenador la respuesta aparece en la 
pantalla un tiempo después, aunque 
el programa se encuentre en la línea 
50 cuando la pulsó. El código de 1: 
última tecla pulsada se almacena 
hasta que se pulse una nueva tecla. Es 
posible comprobar si se ha pulsado 
una nueva tecla examinando el quinto 
bit de la variable FLAG 23611. Su 
valor ha de ser uno si se acaba de 
pulsar una tecla 

Esta variable se puede utilizar para 
comprobar cualquier situación que 
requiera respuestas de tipo sí/no. Si 
se sabe que una situación así va a 
aparecer en un momento determina- 
do de un programa, se podría adelan- 
lar la respuesta antes de que el 
programa llegue a dicha situación. 
Además, si dos teclas se pulsan simul- 
táneamente, el programa respondería 
como si se hubiese pulsado una sola 
tecla 

Caracteres de control se pueden 
generar usando CAPS SHIFT junto 
con las teclas numéricas. La tecla 
ENTER dará el valor 13, pulsando las 
dos teclas SHIFT se obtendrá el valor 
14. Para comprobar esto pruebe el 


programa número 5. 


23561 (REPDEL) 


Esta variable contiene la duración 
del tiempo que una tecla se puede 
mantener pulsada antes de que em- 
piece a repetirse. Se puede alterar el 
valor con POKE, si se quiere que la 


PEEK 


POKE memmen 


tecla comience a repetirse inmedia- 
tamente después de pulsarla. El cur- 
sor es dificil controlarlo si se hace 
POKE 23561,1. Al realizar POKE 
23561.0 se elimina el efecto de repeti- 
ción de la tecla y dando el valor 5 
obtiene un retardo de cinco segundos. 


23562 (REP PER) 


Esta variable controla la duración 
del tiempo entre repeticiones una vez 
que la tecla pulsada comience a repe- 


contestará con el valor de la dirección 

del paréntesis. 

10 DEF EN A() = PEEK 23563 + 256 
X PEEK 23564 

20 PRINT EN АО 


23568 a 23605 (STRMS) 


Los primeros 14 bytes en el BASIC 
del Spectrum contienen direcciones 
de los canales. Los canales —3 a +3 se 
guardan en dos bytes cada uno. 


apunta es la 15360 cuyo valor es 256 
menos que la diri ón del comienzo 
del juego de caracteres de là ROM 
(256 menos porque al generador de 
caracteres se puede acceder con una 
instrucción del tipo PEEK 23606 + 
256 х PEEK 23607 + CODE "A" X 8 
y como el primer carácter es el 
espacio cuyo código es 32 se puede 
ver 8 X 32 = 256). El generador de 
caracteres ocupa 768 bytes, por lo que 
м se desea crear un nuevo juego de 
caracteres se debe dejar а un lado este 
nümero de bytes para no borrarlos. 


urse, Si se quiere apagar el efecto de Se ha mencionado que SCREENS | 
repetición por cualquier motivo basta usa esta variable. Realmente el pro- | 
con hacer POKE 23562.0. Sin embar- 23606/7 (CHARS) blema reside en que SCREENS no 
go. si se quiere aumentar el tiempo 2 reconoce los caracteres definidos por | 
enue repeticiones hay que hacer PO- Esta variable tiene valores fijos: el el usuario a no ser que éstos sean 
КЕ 23562255. Si se quiere editar cero para 606 y el 60 para la similares al que usa el Spectrum. 
lineas de programas largas (como por 22007. La table apunta hacia la SCREENS hace una búsqueda a tra- 
ejemplo lineas PRINT con mucho dirección del comienzo del juego de vés del juego de caracteres que está en 
contenido) haciendo POKE 2356242. caracteres que utiliza para imprimir una tabla hasta que encuentra uno 
incrementará la velocidad del cursor. еп pantalla e impreso! CREEN similar, 
Pero hay que tener cuidado si se también utiliza esta variable del Como el mapa de la pantalla del 
cambia con frecuencia, puesto que el tema. La dirección normal a la que Spectrum se hace bit a bit en vez de 
cursor se puede descontrolar. Los 
valores normales con los que trabaja 
el cursor son 5/50 seg. ó 1/10 seg. | PPP 
Programa num. 5 
10 LET a=PEEK 23560 
23563/4 (DEFADD) 20 PRINT a,CHR$ a AND a»31 
за 60 TO 10 

Es la dirección del argumento (іс ww sss V na 
una función definida por el usuario Programa num. 6 
en un programa. Así, si se tiene DEF 


EN A(B). el valor en 23563/4 será la 


12 FOR х=144 TO 


f 
| 
dirección de la letra Ben los parénte- = PORE 23598 „ЕНА х | 
sis de esa línea. mientras que sólo se 40 РОКЕ 235 PEEK 23676-1 | 
utiliza la función. La mejor forma de 88 ERU. 92856 @; SCREENS (0,0) 
hacer PEEK en 23563/4 para ver esto 
es poner la instrucción PEEK como 38 БӘКЕ 81505 9e 
parte de la función FN a evaluar, ya 30 NEXT x 
que siempre valdrá cero, salvo cuan- 
do se evalüa la función. Lo que P 
significa que la linea Seen DES Ж, PARA LOS UDG’ 
10 PRINT PEEK 23563 + 256 х 3818 ti 202568. Ч x 3 
РЕЕК 23564 )s"" TH ÉTURN 


siempre valdrá cero. Por otro lado 


10 DEF ЕМ А(В) = PEEK 23563 + 
256 X PEEK 23564 
20 PRINT FN A(999) 


contestará con la dirección de B en la 
línea 10. El valor 999 no es significa- 
tivo, sólo es un dato que se da a B 
para prevenir un error. En el caso de 
que una función no tenga argumentos 


-09 00) 

o6 
FORO FO. 
QU. 
o 


23 


000 — 00 O Cû 00 >: 
00660006050 
ФО- ОО) 
66606666 


шо 
ec 
ON 
өө 


SENS ( 
Е 


à =PEEK 23606: LET ЬаРЕЕ 
23606,РЕЕК 23675 


РЕЕК 23676-1 
EN EA cre 


como lo seria un mapa de memoria de 
algunos ordenadores, una vez que se 
imprima algo en la pantalla permane- 
ce igual, aunque se cambie el carácter 
de la memoria. De manera que se 
puede alterar temporalmente el pun- 
lero del juego de ca res hacia el 
juego de caracteres definidos por el 
usuario. 

Aunque hay una variable del siste- 
ma que dice dónde comienza el juego 
de caracteres definidos por el usuario, 
esta dirección es 256 ó más, por lo 
que se debe re: 256. Esto significa 
que se debe ar uno del byte más 
alto. El programa 6 muestra cómo 
hacerlo. 

De esta forma se logra que el 
ordenador crea que los nuevos carac- 
leres sean los verdadero: `REEN$ 
seguirá produciendo caracteres con el 
código entre 32 y 127 aunque esto se 
puede arreglar trasteando.un poco. 
Ya que SCREEN$ empieza con 
CHRS$ 32 y el UDG empieza en 144, 
necesita sumar 112 para devolver el 
juego de caracteres situados en la 
гопа de los UDG. 

Esta es una forma de hacerlo, X es 
lu coordenada x a través de la panta- 
lla. Y e y son las coordenadas vertica- 
les que SCREENS tiene que exami- 
nar. Primero se chequea соп 
SCREENS toda la pantalla en büs- 
queda de un carácter que no sea del 
juego normal de caracteres, y si lo hay 
vuelve a SCREENS. 

El carácter en X, Y se guarda en 
La línea 8025 se necesita sólo si se 
utiliza un juego de caracteres que no 
seu el de la ROM. Si usa los caracteres 
de la ROM, entonces borre las líneas 
8070 y 8080, y sustitüyalas por las dos 
líneas inferiores. (Ver programa 7). 

Solamente hay 21 gráficos defini- 
dos por el usuario. Si SCREENS no 
encuentra su pareja continuará su 
büsqueda más allá de la zona dedica- 
da a los UDG hasta que se salga del 
rango establecido por 32 y 127. Para 
evitar que esto ocurra, aunque los 
UDG se encuentran al final de la 
RAM, se puede añadir la siguiente 
línea: 


6065 IF A$ > CHR$ 164 THEN LET 
А: 


gen 


Hay que asegurarse que el conteni- 
do de 23606/7 siempre apunte hacia 


el juego de caracteres correcto, cuan- 
do se ejecuten instrucciones como 
PRINT, LIST. etc. 


23608 (RASP) 


Controla la duración del zumbido 
indicador de que se ha quedado sin 
memoria. Cuando se conecta el ара- 
rato esta variable tiene el valor 64. 
Esto se puede alterar pero tiene poco 
sentido. POKE 23608,0 hace que 
suene un click en vez del clásico 
zumbido, sin embargo POKE 
23608,255 hace sonar un zumbido 
largo que bloquea el teclado evitando 
así que se introduzca más informa- 
ción. 


23609 (PIP) 


Controla la duración del c/ick que 
suena al pulsar una tecla en el modo 
comando (K) o durante un INPUT. 
Comienza en cero, pero se puede 
alterar. Cualquier valor entre 30 y 130 
hace que suene un beep. más audible 
en vez del discreto click. Valores 
superiores a 130 hacen disminuir la 
velocidad de respuesta del teclado 
(debido a que no ejecuta hasta que no 
finaliza el beep). El valor más corrien- 
te es POKE 23609,100. 


23610 (ERR NE) 


Controla el número que hay al 
producirse un error. Normalmente el 
255, a no ser que se produzca un 
error, cuando esto ocurre el número 
que se almacena es una unidad infe- 
rior al que aparece en elmensaje de 
error. Por ejemplo, 4 Out of Memory 
guardaría un tres. El mensaje de error 
que aparece se halla situado a partir 
de la posición 5010 de la ROM. El 
final del mensaje se detecta al tener el 
séptimo bit del último carácter cam- 
biado a uno. Después de los mensajes 
de error aparece 9 1982 Sinclair 
Research Ltd. ál igual que cuando 
conecta el ordenador o utiliza el 
comando NEW. Se puede hacer un 
POKE 23610 para generar un error 
que pare el programa. pero como el 
mensaje es fijo y está en la ROM, 
podríamos acabar con algo ilegible. 


Si se quiere simular el error “Ош of 
Memory” para acabar un programa 
basta con hacer POKE 23610,3. Esto 
puede formar parte del programa 
principal colocándolo al final del 
mismo con una de las condiciones 
de lin de programa. 


23611 (FLAGS) 


sta variable contiene varias más- 
caras que controlan el BASIC y 
generalmente no se las debe alterar. 
De todo modos algunas máscaras 
pueden ser ütiles. 

Bit 0: Si es 1 indica que no se 
debe poner ningün espacio 
antes del próximo comando. 

Si es 1, todo lo que apa- 
con PRINT ha de vol- 
hacia la impresora. Un 

cero imdica sacarlo por pan- 
talla. 

Bit 5: Cualquier tecla pulsada se 
indica por su código almace- 
nado en 23560 (la variable del 
sistema LASTK) y el bit quin- 
to de 23611 (FLAGS) se acti- 
va para indicar que una tecla 
se ha pulsado. 

Bit 7: Máscara de sintaxis. 

Son más ütiles cuando se utilizan 

para programar en código máquina. 


23613/4 (ERR SP) 


Controla las direcciones donde se 
encuentran las pilas de RETURN. 
Intente hacer varios GOSUB sin po- 
ner RETURN alguno y compruebe 
este. punto en la memoria, Ahora 
puede comprobar lo que ocurre 
cuando se queda: sin memoria. Tam- 
bién intente hacer un PEEK del 
contenido de estas tres direcciones (a 
cuya base apunta 23613/4 para ver 
con qué datos responde. (Ver pro- 
grama 8). 


23617 (MODE) 


Especifica el modo de operación. 
Su valor puede ser 0, 1, 2 6 4, según 
que el cursor sea L/C, E, G o K, 
respectivamente. Haciendo un POKE 
a esta variable afectará al modo del 
cursor. Puede aparecer como una 


letra, número, símbolo o palabra 
clave parpadeante. Esto es más útil en 
una instrucción INPUT. El valor se 
inicializa cuando se necesite, por 
ejemplo, cuando se cambie el cursor 
desde el teclado. 

Pruebe el programa 9 que realiza 
un POKE de todos los posibles valo- 
res en 23617, La mayoría son varian- 
tes de los cuatro modos de trabajo. 


23618/9 NEWPPC Y 23620 NSPPC 


23618/9 es una variable de dos 
bytes que contiene el siguiente núme- 
ro de línea a ejecutar. 23618 contiene 
el byte más bajo y 23619 el más alto, 
de manera que para leer el número de 
línea que contiene hay que hacer 
PEEK 23618 + 256 x PEEK 23619 

Para hacer un POKE de una línea 
determinada, por ejemplo X. se haría 
lo siguiente: 


POKE 23618,X—256 X INT (X/256) 
POKE 23619, INT (X/256) 


Con las variables 23618/9 y 23620 
se puede simular el comando GOTO 
hacia una línea de nuestro programa 
siempre que haga falta. El GOTO no 
se puede hacer a un lugar determinado 
de una línea con más de una instruc- 
ción. 

Para saltar a una instrucción que se 


encuentra dentro de una linea muy 
larga del programa, por ejemplo. la 
cuarta instrucción de la linea X. 
primero habría que hacer todo lo 
descrito anteriormente y luego hacer 
POKE 236204 y saltará a dicha 
instrucción. 


23624 (BORDCR) 


Los bits de esta variable controla 
los atributos de la parte inferior de la 
pantalla y el color del BORDER. 
Haciendo varios POKES en esta va- 
riable, se puede conseguir que parpa- 
dee, brille o una pantalla inferior en 
multicolor, incluso se puede hacer 
que INK y PAPER sean del mismo 
color protegiendo de esa manera los 
programas. También se puede dar 
más brillo a los INPUTS para que 
resalte. (Ver tabla 1), 


23627/8 (VARS) 


Apuntan hacia las variables. Ade- 
más de encontrar la zona de las 
variables, se puede ver la longitud que 
ocupa un programa con esta expre- 
sión. Esta excluye los bytes que ocupa 
la pantalla, las variables del sistema 
las variables del programa y las pilas: 


Programa num. 8 


25 LET asPEEK 235613+255*PEEK 2 
PRINT PEEK а; ТАВ 10;PEEK (а 


+1); TAB 20; РЕЕК 


(ажа) 


p—————ÓÀ—Á——À—À— E < 


Programa num. 9 


10 FOR asQ TO 255 


RIN 
OKE 
МРОТ añ 
EXT 


Programa num. 10 


10 LET аз5 
20 LET аза 
чала PRINT PEEK 23629+256*PEEK 2 


a 
23517, 


LET byte = PEEK 256 
PEEK 23628 — PEEK 23635 — 
256 х PEEK 23636 


23027 


23629/30 (DEST) 


Almacena la dirección de la уапа- 
ble cuando es asignada. Si es asignada 
antes, apuntará al principio de donde 
está situada la zona de variables. Si es 
definida por primera vez apuntará a 
la dirección del comienzo del nombre 
de la variable en el programa, por 
ejemplo: LET А-5, apuntará a la 
dirección de la letra A. 

También puede ser útil para encon- 
trar la dirección de memoria de una 
variable numérica. (Programa 10). 


23631/2 (CHANS) 


Almacena la dirección del comien- 
zo del canal de información. 


23633/4 (CHURCHL) 


Almacena la dirección de la infor- 
mación de E/S utilizada hasta el 
momento. Normalmente apunta ha- 
cia un bloque de 5 bytes durante la 
operación de E/S. Utilice el progra- 
ma 11 para examinar los contenidos. 


23655/6 (PROG) 


Contiene la dirección del comienzo 
del programa BASIC. Este apunta al 
primer byte del primer nümero de 
línea del programa. Puede ser útil a la 
hora de convertir programas а otros 
ordenadores de Sinclair Research con 
información almacenadas en las sen- 
tencias REM como primera línea de 
programa. 

Si se quiere asegurar una línea de 
un programa bastará con hacer un 
POKE 0 en los dos primeros bytes del 
número de la línea. al comienzo del 
programa. 


23637/8 (NXTLIN) 


Guarda la dirección del comienzo 
de la siguiente línea de un programa. 
Esto es útil a la hora de acceder al 


código máquina que se 
sentencias REM en cualquier lugar 
del programa, por ejemplo aquellas 
subrutinas que se cargan con la ins- 
trucción MERGE desde una bibliote- 
ca de programas (Programa 11). 

El único problema que puede gene- 
rar es si se almacena dentro de una 
sentencia REM el color. INK, 
FLASH, BRIGHT pueden dar lugar 
а interpretaciones erróneas por parte 
del C/M. De todos modos si se utiliza 
la libreria de subrutinas no habrá 
ningún problema puesto que no las 
utiliza, 


23639/40 (DATADD) 


Esta variable contiene la dirección 
de la última coma utilizada en una 
sentencia DATA. Si no se ha leído 
nada de la lista (por ejemplo, después 
de RUN) la dirección almacenada en 
23639/40 es la del byte antes del área 
de programas, normalmente el CHR$ 
128 al final del canal de información. 
Para confirmar esto ejecute el pro- 
grama 12, 

La dirección almacenada en esta 
variable de 2 bytes puede apuntar al 
carácter ENTER o a la coma dando a 
entender que ha finalizado una línea 
о sentencia que contiene DATA. 


23641/2 (ELINE) 


Esta variable contiene la dirección 
del área que se encuentra después de 
las variables. Desde aquí se puede 
hacer una idea de lo que ocupan la 
pantalla, las variables del sistema, el 
programa y las variables del progra- 
ma, una vez que se ha ejecutado un 
programa fijando las variables. Te- 
clee lo siguiente: 

PRINT PEEK 23641 + 256 X PEEK 
23642 — 16384 

También puede obtener la informa- 

ción de la memoria ocupada por las 


TABLA- 1 


BIT6 


variables una vez ejecutado el pro- 

grama. Para ello teclee la siguiente 

instrucción: 

PRINT РЕЕК 23641 + 256 Х PEEK 

23642 — PEEK 23627 — 256 X 
PEEK 23628 


23653/4 (STKEND) 


Contiene la dirección donde em- 
pieza la memoria libre. Leyendo estos 
bytes puede hacerse una idea de 
cuánta memoria queda libre restán- 
dola de la RAMTOP. Esto no incluirá 
la memoria utilizada para almacenar 
las pilas GOSUB, pero si la longitud 
de las sentencias PEEK. De manera 
que se puede orientar bastante, 
PRINT PEEK 23730 + 256 X PEEK 
23731 — PEEK 23653 — 256 Х 

PEEK 23654 


23658 (FLAGS 2) 


Esta variable contiene algunas de 
las máscaras utilizadas por el ordena- 
dor para indicar ciertas condiciones. 

La mejor forma de utilizarlo es 
comprobando el bit 3 que informa si 
CAPS LOCK está activado (1) o no 
(0). 

¿Para qué sirve? Si en un programa 
se utiliza para la entrada de datos la 


Programa num. 
35 

SE 2 
827 


Programa num. 


12 


tecla INKEY$ de manera que sólo 
admita las mayúsculas, con esta va- 
riable se obliga a la máquina a que 
todo lo que se teclee pueda ser 
entendido. El ordenador no razona 
como los humanos. Para usted es lo 
mismo decir “SI” (con mayúsculas) 
que “51”, pero по para la máquina. Es 
tentador el usar POKE 23658,8 para 
cambiar el estado del cursor y POKE 
23658,0 para volverlo a su estado 
primitivo; por eso es conveniente 
comprobar el estado de las máscaras 
ya que éstas se pueden alterar sin que 
se dé cuenta. Normalmente, si el 
cursor está en el modo L, 23658 
valdrá 0, por lo que no habrá ningún 
problema si se quiere utilizar esta 
variable. 


23659 DF SZ 


Esta variable contiene el número de 
líneas que hay en la parte inferior de 
la pantalla, normalmente utilizada 
para las entradas INPUT o los men- 
sajes de error, etc. Normalmente val- 
drá dos salvo si tiene INPUTS muy 
extensos. Si hace POKE 23659,0 para 
limpiar la parte inferior de la pantalla 
y así utilizar el juego completo de las 
24 líneas, lo único que conseguirá es 
que el sistema se venga abajo y se 
bloquee. 

Sin embargo esto se puede hacer 


11 


33+255 #PEEK 23634 NEX 
34: їр 
: STOP E S 


PRINT 8x; PEER 


20200 LET REUSR (PEEK 23637-2564Р 


EEK 2363845 


8210 REM Codigo Maquina 


8220 RETURN 


— sr 


BIT4 


BIT 3 


BIT 1 BIT Y 


BRIGHT 


BORDER Y PAPER 


INK 


con algunas restricciones. Estas son 
que hay que restablecer el valor de 
esta variable antes de hacer cualquier 
uso de ella, de manera que hacer un 
BREAK en un programa puede ser 
catastrófico. También errores gene- 
rados a lo largo del programa tendrán 
el mismo efecto, ya que los mensajes 
de error aparecen en dicha zona de la 
pantalla. El programa 13 ilustra lo 
dicho hasta ahora. Se pueden utilizar 
las dos líneas inferiores, la 23 y 24, 
con las instrucciones PRINT 


de la línea 22. La pantalla se restable- 
ce haciendo POKE 23659,2 dentro del 
programa. 

Para demostrar la clase de error 
que se puede generar, se puede “рго- 
ducir” un error añadiendo la siguien- 
te línea: 


45 PRINT error 


Si se quiere utilizar las últimas 
líneas de la pantalla, lo mejor es usar 
la instrucción PRINT + 1; "texto" 
que funciona tan bien o mejor, que 
utilizando esta variable. Si cambia el 
valor de la variable por uno superior 
a dos, la parte superior de la pantalla 
se verá reducida más de lo normal. 
De manera que después de hacer 
POKE 23569,Y, la parte superior de 
la pantalla tendrá 24-Y filas y hará un 
scroll cuando la posición de PRINT 
llegue más allá de 24-Ү,0. 

El programa 14 demostrará cómo 
se puede mantener un scroll de la 
pantalla con la variable DF SZ y SCR 
CT. Aquí aparecen nümeros aleato- 
rios y hace un scroll de 14 líneas de la 
pantalla. 


23670/1 (SEED) 


Cuando se utiliza un nümero con la 
instrucción RANDOMIZE, ese nú- 
mero es almacenado en esta variable. 
Este es el número que determina el 
siguiente número aleatorio. Cono- 
ciendo esto, se tiene la posibilidad de 
poder hacer “trampas”, ya que se 
puede prefijar el número a salir en la 
próxima “tirada”, 


23672/3/4 (FRAMES) 


Este es un contador de pantallas 
que se puede utilizar como cronóme- 


жыды ан ы зм ӘБ 


A] 


tro. Cuenta pantallas de TV e incre- 
menta 50 veces por segundo. Aunque 
el tiempo que tarda en leer y evaluar 
estos tres bytes del reloj no permite 
que sea exacto, Tiene un límite má- 
ximo de cuatro días (unos tres días y 
21 3/4 horas). El manual del Spec- 
trum (capítulo 18) comenta que se 
necesita leer los valores de estos tres 
bytes dos veces consecutivas y coger 
el valor más alto de las dos lecturas 
para mayor seguridad. Hay que re- 
calcar que el orden de los bytes es el 
inverso al que se está acostumbrado. 
El byte más significativo es el 23674, 
de manera que el valor del reloj hay 
que leerlo de la siguiente forma: 


65636 X PEEK 23674 + 256 X PEEK 
23673 + PEEK 23672 


el cual contestará con el valor del 
tiempo en 1/50 de segundos. 

Hay varias cosas que afectan la 
exactitud de este reloj: el comando 
BEEP para el reloj; la impresora y la 
gradora, etc., también afectan a dicha 
exactitud. Sin embargo, PAUSE no 
afecta en absoluto al correcto funcio- 
namiento del reloj. 


23675/6 (UDG) 


La dirección de comienzo de los 
gráficos definidos por el usuario 
normalmente es 32000 en el Spectrum 
de 16K o 65368 en el de 48K. Este 
número es el mismo que el de USR 
“а”, de manera que PRINT USR “a” 
se corresponde con: 


PRINT PEEK 23675 + 256 X PEEK 
23676 


Los fanáticos del POKE se pueden 
divertir con esta variable. El manual 
aconseja cambiar esto para ahorrar 
espacio al tener menos gráficos defi- 
nidos por el usuario. También se 
puede hacer todo lo contrario, es 
decir, establecer un juego de gráficos 
definidos aunque sólo se puedan uti- 
lizar un juego de 21 UDG a la vez. 
Recuerde que como se pueden hacer 
21 UDG es necesario reservar 21 X 8 
(168) bytes para cada juego separado 
de UDG y hacer un POKE del 
comienzo del juego de caracteres en la 
variable 23675/6. 

Para divertirse teclee el siguiente 
comando: 


POKE 23675,96 : POKE 23676,127 
(Spectrum 16K) 


POKE 23675, 96 : POKE 23676,255 
(Spectrum 48K) 


Entonces usando el juego de gráfi- 
cos definidos por el usuario, intente 
teclear cualquier mensaje... ¡ya verá 
lo que ocurre! 

Sólo le daremos una pista, "..4 vez 
que establezca el juego de UDG 
guárdelo en cinta. La mayoría de los 
usuarios hacen algo parecido a SAVE 
“carac” CODE 32600.168. Esto está 
bien, pero obliga a especificar la 
dirección del comienzo del juego de 
UDG. También se puede hacer SAVE 
“carac” CODE (PEEK 23675 + 256 X 
PEEK 23676),168 y ya puede guardar 


Programa num. 


те сҮн 
а=:РЕ 


10 DA 
20 LET 
42 


13 


акынан до! 
Ёк 2363942564РЁЕК 2 


@ PRINT а; ТАВ 9; РЕЕК San 18 


3 
;CHRS PEEK a 
i COO RERD b 


AND PÉEK a»3 


52 60 TO 20 


Programa num. 


POKE 23659,0 
FOR аад TO 
PRINT a 
NEXT а 


14 


23 


PAUSE 2 
POKE 23659,2 


—— 


el actual juego de gráficos que haya 
definido en cinta sin preocuparse de 
la dirección de donde empieza. Esto 
por ejemplo, permite cargar un juego 
de caracteres que se haya definido en 
un Spectrum de 16K a otro de 48K sin 
tener que conocer las direcciones. 

Para cargar un juego de UDG en 
otra máquina con distinta memoria 
basta con hacer 


LOAD “carac” CODE (PEEK 23675 
+ 256 Х РЕЕК 23676),168 


Esto automáticamente relocalizará 
los datos en la dirección correcta, 
para que la máquina haga uso de ellos 
cuando los necesite. Esto sería lo 
mismo que LOAD “сагас” CODE 
USR “а”, pero lo único que ahorra es 
el teclear tanto. 


más alto de la dirección del buffer de 
LPRINT. Este se puede variar a gusto 
del programador, pero si se utiliza la 
impresora se volverá a reinicializar a 
91. 23680 y 23681 juntos contienen la 
dirección de la posición de LPRINT 
dentro del buffer de la impresora. No 
afectará de ninguna manera si se hace 
algún POKE a la impresora, pero 
cualquier cosa que se le almacene se 
borrará si se utiliza la impresora. 


23677/8 (COORDS) 


23677 es la variable que contiene la 
coordenada x del último punto 
PLOT. Después de hacer CLS co- 
mienza en cero y 23678 es la variable 
que contiene la coordenada Y del 


23688/9 (SPOSN) 


23688 contiene información acerca 
de hasta donde ha llegado la senten- 
cia PRINT en la pantalla. Comienza 
en 33 a la izquierda de la pantalla y va 
decreciendo en una unidad cada vez 
que la posición PRINT se dirige a la 
derecha. Después de utilizar la ins- 
trucción RPINT АТ X.Y (si X e Y 
son coordenadas válidas) 23688 al- 
macenará el valor 33—X. Esto puede 
servir para evitar que las palabras se 
corten al final de una línea de forma 
poco ortodoxa. Imagínese que el nú- 
mero contenido en 23688 va descon- 
tando hacia cero según se va llenando 
la línea, podemos ver que comparan- 
do esto con la longitud de la palabra a 


TABLA- 2 


BIT 6 


BIT 3 


BIT 2 


PAPERS 


INVERSE 1 


perman. 


INVERSE 1 


temp. 


23679 (Р POSN) 


Contiene la información acerca de 
la longitud que tiene que recorrer la 
instrucción LPRINT en el buffer de 
impresora, No se puede variar el 
contenido con POKE. 


23680 (PRCC) 


Contiene el byte más bajo de la 
dirección a donde irá situado el si- 
guiente carácter en el buffer de la 
impresora, si es cero irá situado en la 


_ columna izquierda, 15 si va en la 


columna 15, etc. Como esta es la 
dirección de la línea superior de cada 
carácter, se puede variar (POKE) 
para cambiar la posición LPRINT en 
el buffer siempre y cuando se cambie 
a su vez el valor situado en la variable 
Р POSN (23679) para igualarlo. 


23681. Variable del sistema sin asignar 


‚ Esta variable aunque no se utiliza, 
siempre contiene 91. Esto es el byte 


último punto PLOT. Contiene el 
valor actual, de manera que si el 
último punto PLOT tenía como 
coordenadas 3,3 ambos bytes alma- 
cenarán un tres. 

Estos valores se les puede variar 
con POKE, ya que ello implica el 
dibujar dicha coordenada en panta- 
lla. Esta es una manera de mover el 
cursor PLOT alrededor de la panta- 
lla. Esto se puede hacer mediante la 
instrucción 


PLOT OVER 1; X, Y: PLOT OVER 
1; XY 


pero sería un poco engorroso. 


23684/5 (DF CC) 


Almacena la dirección del fichero 
de salida de la posición PRINT. Se le 
puede variar para mandar los PRINT 
hacia otra dirección, aunque esto 
requiere una cierta preparación de 
cómo está organizada la pantalla. 


escribir se puede saber si la palabra 
cabe en esa línea o hará falta saltar a 
la siguiente para evitar que la palabra 
sea cortada en el momento de que 
23688 valga cero. Supongamos que la 
palabra a escribir sea W$, la instruc- 
ción sería la siguiente: 


ЇЕ PEEK 23688 < LEN W$ +I 
THEN PRINT 


Esto sólo funciona con palabras 
cuya longitud sea inferior a 32 carac- 
teres. 

23689 contiene la información rela- 
tiva al nümero de líneas que le queda 
por rellenar en la pantalla. El valor 
inicial es 24 que es el de la línea 
superior de la pantalla y decrece en 
una unidad segün se va bajando por 
la pantalla. Si en vez de querer hacer 
un scroll cada vez que se llega a la 
parte inferior de la pantalla, lo que 
quiere es limpiarla, bastará con hacer 
la siguiente instrucción: 


IF PEEK 23689 — 3 THEN CLS 


23692 (SCR CT) 


Contiene el número de scrolls que 
tiene que hacer más uno antes de 
preguntar si hace otro scroll. En los 
juegos gráficos esto puede generar 
problemas, ya que no interesa esperar 
tiempo de respuesta. De manera que 
si en la variable 23692 se almacena 
cualquier número que no sea uno, no 
hay tiempo de espera. Por lo que con 
РОКЕ 23692,255 el ordenador escri- 
birá 255 líneas en la pantalla antes de 
preguntar si hace un scroll. 


23693 (ATTR 0) 


Contiene los atributos permanentes 
o los atributos globales. Colores par- 
ticulares en làs sentencias PRINT se 
manejar: ч en otra parte. La mayoria 
de las rutinas de la ROM utilizan los 
valores de la variable del sistema con 
un valor temporal, ya que éstos con- 
lienen unos atributos permanentes a 
no ser que se varíen. CLS limpia la 
pantalla y la pone como establezca la 
variable ATTR P. La función de los 
bits es la siguiente: 
Bit 1 cuando FLASH es 1. 
Bit 7: 0 cuando FLASH es 0. 
Bit 6: 1 cuando BRIGHT es 1. 
Bit 6: 0 cuando BRIGHT es 0. 
Bits 5. 4 y 3 contienen el color del 
papel en binario. por ejemplo. para 
PAPER 7, los bits 5, 4 y 3 уа гал 
todos 1. 
Bits 2, | y O contienen el valor de INK 
en binario, al igual que PAPER. 
Atributos como el 8 y el 9 no se 
manejan con esta variable. Si el valor 
del atributo fuera 8 ó 9, entonces los 
valores establecidos por esta variable 
no serían válidos. 


23694 (MASK P) 


Esta variable ayuda al Spectrum a 
determinar el atributo de cualquier 
parámetro cuyo valor sea ocho. De 
manera que si especifica BRIGHT 8 
globalmente, el bit 6 de 23694 valdría 
uno para recordarle a la máquina en 
el futuro que BRIGHT 8 ha sido 
especificado. Para determinar el co- 
lor/flash/bright cuando'se imprimen 
mens; el ordenador comprueba lo 
que hay allí e imprime la palabra con 


esa característica. O si se quiere pue 
hacer una sobreimpresión del cará 
ter en la pantalla dejando los atribu- 
tos tal v como están. (Ver tabla 2). 
Bit 7: 1 cuando FLASH 8 está acti- 
vado. 
Ви 6: 1 
activado, 
Bits 5. 4 y 3 valen todos | cuando 
PAPER es 8. 

Bits 2, 1 y 0 valen todos 1 cuando 
1МК es 8. 


cuando BRIGHT $ está 


23695 (ATTR T) 


Esta variable contiene el valor ac- 
tual del color establecido por una 
sentencia PRINT. Esto lo puede ver 
por si solo con las siguientes instruc- 
ciones: 


PRINT PEEK 23695 
PRINT INK PAPER 0: 
23695 


PEEK 


o es, se incluye el comando 
Р X en la instrucción PRINT bajo 
el efecto de un color de tinta. Nor- 
malmente, a no ser que se especifi- 
quen valores particulares, esta varia- 
ble almacenará el valor global del 
color. Los atributos utilizados para 
imprimir se toman de esta variable y 
las cosas se equilibran de manera que 
la ünica diferencia entre las variables 
ATTR T y ATTR P es que en aquella 
los valores de los atributos decrecen. 


23696 (MASK T) 


Es similar a la variable MASK P 
(23694) excepto que los parámetros 
aquí son temporales. Normalmente el 


mismo que el parámetro permanente 
de ocho, éste cambia mientras los 
colores locales, etc. efectúan su come- 
tido. Se verá con más facilidad con el 
siguiente comando directo: 


PRINT PE 23696, INK 8: P. 
23696, INK 0: FLASH 8: PEEK 
23696 


Los bits individuales tienen las fun- 
ciones que se ilustran en la tabla 5. 


23697 (P FLAGS) 


Esta variable contiene las máscaras 
neces s utilizadas durante el pro- 
ceso de imprimir. Especificando PA- 
PER 9 los bits 6 y 7 son puestos a 1. 
Con INK 9 son puestos a l los bits 4 y 
5. Con INVERSE 1 los bits 2 y 3 son 
puestos а 1. Y después de que sč 
especifique OVER | se ponen a 1 
los bits 0 y 1. Los efectos son perma- 
nentes si se ponen a 1 los bits 
impares y temporales 81 se ponen a 1 
los bits pares, (Ver tabla 6). 


23681/23728/9 


Estos tres bytes no se suelen utiliza 
por el Spectrum. Pueden ser utiliza- 
das en los programas par almacenar 
información que interese. Estos bytes 
son muy ütiles a la hora de programar 
en lenguaje máquina pudiendo acce- 
der a ellos directamente en vez de 
buscar la variable en el área de las 
variables. 23728/9 se pretendían utili- 
zar para interrupciones sin máscara, 
pero éstas no existen en el Spectrum. 


Programa num. 15 


19 POKE sona n: POKE 23659,10 


20 PRINT 
30 GO TO 10 


Programa num. 16 


10 INK & 
20 POKE 23694,BIN 22222011 
5:39 PRINT RT 0/0; D 


INK 5; "655555 


40 PRINT RT 0,0;"1111" 


BIT4 


BIT 3 


BIT 2 BITI 


BIT @ 


PAPER 8 


Temp. 


INK 8 


Temp 


23730/1 (RAMTOP) 


Esta variable de dos bytés apunta 
hacia el último byte de la RAM del 
área del BASIC. Esta no indica el 
linal de la memoria utilizada por el 
BASIC en el sentido de que los UDG 
normalmente se almacenan por enci- 
ma de esta dirección. Si se sube la 
RAMTOP por encima de la zona 
dedicada a los UDG se pueden perder 
éstos, pero a su vez se ganará memo- 
па, que puede ser útil sobre todo para 


aquellos usuarios con el Spectrum de 
16K. 

Un punto importante es que el 
comando NEW opera hasta la zona 
de memoria indicada por la variable 
27320/1. de ra que se puede 
almacenar DA en estas direccio- 
nes para que sean utilizadas por 
distintos programas. 


23732/3 (RAMPT) 


la dirección donde acaba la RAM del 
Spectrum. Si se adquiere un Spectrum 
cuya capacidad de memoria nos es 
desconocida. no hay por qué mirar 
sus interioridades. bastará con teclear 
el siguiente comando: 


PRINT PEEK 23732 + 256 X PEEK 
23733 — 16384 


Los 16384 bytes restados son para 
la ROM, ya que la RAM comienza a 
partir de esta dirección y va hasta la 


ESPANA 


EUROPA. MARRUECOS. TUNEZ 


TURQUIA, ARGELIA Y CHIPRE 


COSTA RICA. CUBA, CHILE РА 


RAGUAY Y НЕР DOMINICANA 


GIBRALTAR Y PORTUGAL 
FILIPINAS 


dirección indic por la variable 
Finalmente, esta variable contiene almacenada еп Р RAMT. 
SUSCRIBASE A 
(12 NUMEROS) 
TARIFA DE PRECIOS DE SUSCRIPCION : 
CORREO CORREO CORREO CORREO 

ORDINARIO | CERTIFICADO | AEREO | AEREO-CERTIF 
PTAS $ | PTAS $ | PTAS $ | PTAS WI 
3.000 21 3.273 23 | 3.055 22| 3333 24 | 
3.456 25 | 4272 31 3.600 26 | 4418 3/2)! 
3.396 24 30 | 4.164 30 | 4.980 36 | 
3.264 23 29 | 3.149 22 | 3965 28. | 
3.264 23 25 | .3.775 27 | 4.050 29 | 
3.456 -25 31 | 4224 30 | 5.040 36 | 
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terreno de la informática 

es aün muy reciente, y como 

ocurre siempre en estos casos 

existen muchas lagunas lega- 
ШИШ... por cubrir. Una de estas 
ausencias más importantes y reitera- 
damente destacadas por los profesio- 
nales de la informática es la ausencia 
de leyes de protección de sofware. 
Las medidas de protección de la 
propiedad intelectual actuales son tan 
obsoletas como inoperantes. Ante 
situación los "ingenieros del 
software" investigan nuevos proce- 
dimientos y nuevas combinaciones 
hardware-software para evitar, o al 
menor complicar. la piratería de su 
trabajo 

En ocasiones lleva incluso a nuevos 
procedimientos comerciales. En el 
lanzamiento del nuevo QL, Sinclair 
inclu,e en su precio cuatro potentes 
programas desarrollados por Psion, 
consciente de que de otra forma las 
copias serían inevitables (y esto en un 
país como Inglaterra donde el control 
de la propiedad intelectual está bas- 
tante regulado). 

Ningún procedimiento de protec- 
ción es totalmente infalible, lo que 
lleva a una espiral de sofisticación 
constante de estos procedimientos. 
Esperamos con este artículo poner 
algunos de estos medios en sus manos 
para que también usted pueda prote- 
ger sus propios programas. Algunas 
de estas técnicas son utilizadas co- 
münmente por los profesionales del 
software. 

El primer problema empieza con la 
carga de programas. Si el programa 
no empieza a ejecutarse automática- 
mente será imposible evitar que el 
usuario introduzca el comando SA- 
VE. Para ello el Spectrum dispone de 
la instrucción SAVE "nombre" LINE 
XXXX con la que el programa car- 
gado se ejecuta inmediatamente a 
partir de la línea especificada. Este es 
sólo un primer paso, bastante inütil, 
si es el ünico, pues el Spectrum 
también tiene la instrucción MERGE 
con la que poder coger un programa a 
fin de unirlo a otro, que nunca será 
ejecutado, aunque hubiese sido gra- 
bado utilizando la instrucción LINE 
Sinclair ha mejorado este aspecto con 
el lanzamiento de los Microdrive, con 
los que no es posible utilizar MERGE 
con aquellos programas en que se 
utilizó la opción LINE. Pero con la 
cinta sí es posible. 

A primera vista puede parecer que 
SAVE "nombre" LINE es la única 
forma de lograr que el programa se 


esta 


ejecute inmediatamente después de 
haberse cargado. Examinando los 
programas comerciales puede com- 
probarse que programas grabados en 
código máquina también se ejecutan 
de forma automática. El Spectrum 
permite grabar cualquier área de 
memoria con la instrucción SAVE 
"nombre" CODE, COMIENZO, 
NUMERO BYTES. Grabando toda 


la información contenida en la RAM 
se graba el programa en BASIC 
Cuando se efectüe la carga de los 
bytes grabados, el ordenador estará 
en idéntica situación a cuando se 
efectuó la grabación. El Spectrum 
almacena el BASIC en un área de 
memoria que dispone al efecto, utili- 
zando 180 bytes para descripción del 
programa (variables utilizadas, pri- 


mera instrucción a ejecutar, etc.). 
siguiente programa quedará Е 
de esta forma, útelo, desconecte 
su ordenador o introduzca la instruc- 
ción RANDOMIZE USR 0 y cargue 
el programa (LOAD “DEMO”...) 
100 PRINT “Antes del SAVE" 

110 SAVE "DEMO" CODE 23552. 
1500 

120 PRINT “Después de SAVE” 
130 GOTO 120 

Como verá, acabamos de encontrar 
otra forma de que un programa en 
BASIC se auto-ejecute sin necesidad 
de recurrir al comando EINE, evitan- 
do el uso de MERGE. De hecho esta 
es una técnica ampliamente utilizada 
en el software comercial. 

Cambiando el valor 23552 por 
16384 en la línea 110 se logra grabar 
el programa en BASIC y la imagen de 
la pantalla en el momento de efectuar 
la grabación, obteniéndose poste- 
riormente el gráfico con gran rapidez. 

Desgraciadamente aün es posible 
entrar en el listado, pero es más 
difícil, sobre todo si es largo. El 
comando LOAD “nombre” CODE 
permite especificar una nueva locali- 
zación de memoria a la que entrar 
posteriormente. Lógicamente, es más 
dificil en un Spectrum de 16 K. 

Además, otro de los inconvenientes 
de utilizar este procedimiento es la 
imposibilidad de verificar la graba- 
ción, ya que el comando VERIFY 
siempre nos dará error, aun cuando la 
grabación haya sido correcta. Esto es 
debido a la grabación de datos que 
están continuamente cambiando, 
como por ejemplo el reloj. Algunos 
programadores utilizan esto para 
descubrir las copias. Conociendo el 
"valor del reloj en el momento de la 
grabación se puede después comparar 
cuando en el programa se ejecute. 
Una pequeña diferencia evidencia la 
existencia de una copia y el programa 
se autodestruye. Pero tampoco esto es 
infalible: una vez que se logra entrar 
en el listado, sólo hay que encontrar 
la instrucción que busca el valor del 
reloj, es decir, buscar el valor 32673 y 
producir un salto sobre esta instruc- 
ción. El capítulo 18 del manual ofrece 
un buen ejemplo sobre el uso del 
reloj. 

Pero no nos desanimemos por ello. 
Otra posibilidad estriba en eliminar la 
comunicación con el usuario o, lo que 
es lo mismo, en desactivar el teclado, 
El Spectrum comprueba si es presio- 
nada alguna tecla, entre Otras cosas, 
50 veces por segundo. Si elimir „i 
este control, eliminaremos la pos 


lidad de interrumpir el programa al 
mismo tiempo que se logrará que éste 
vaya más rápido. Veamos cómo: 


100 POKE 23296.243 
110 POKE 23297201 
120 RANDOMIZE USR 23296 


Pero recordemos que el reloj es 
para el Spectrum lo que el corazón 
para las personas: no puede vivir sin 
él. El ordenador no responderá cuan- 
do se presione alguna tecla, con la 
excepción del comando INKEYS. In- 
troduzca dos líneas más al programa 
antes de ejecutarlo: 


130 PRINT INKEYS 

140 GOTO 130 

e pequeño truco puede ser inte- 
resante, pero ha de utilizarse con 
precaución. Existen además determi- 
nadas funciones que son controladas 
por el reloj. Por ejemplo, BEEP, 
SAVE o COPY, que lógicamente no 
podrían llevarse a cabo si se le de- 
sactiva. La principal ventaja que 
ofrece es de rapidez, al evitarse que el 
ordenador compruebe 50 veces por 
segundo si alguna tecla ha sido pre- 
sionada. 

Si seguimos investigando la forma 
en que podemos evitar que alguien 
acceda al listado, pronto pensaremos 
en la posibilidad de evitar el uso de la 
tecla BREAK o, al menos, hacer que 
funcione de otro modo. Tanto el 
mensaje de BREAK como STOP son 
tratados por el Spectrum como un 
error. Veamos cómo trata el Spec- 
trum a los errores. 

La variable del sistema ERR-SP 
(dirección 23613-4) se encarga de los 
errores. Realmente en esta dirección 
se incluye la dirección de otra locali- 
zación a la que el ordenador saltará 
para el oportuno mensaje de error. 
¿Ha pensado ya que ocurriría si 
cambiásemos este valor? El siguiente 
programa obliga a bifurcar a la direc- 
ción 0 cuando ocurra un error, con lo 
que se autodestruirá el programa 


100 POKE 
110 POKE 23614,91 
120 POKE 23298,0 
130 POKE 23299,0 
140 PRINT “2”, 
150 GOTO 140 


23613,2 


El programa direcciona ERR-SP 
hacia las direcciones 23298 y 23299, 


normalmente utilizadas por la impre- 
sora donde se ha colocado la nueva 
dirección (O). También puede elegir 
otras direcciones distintas del buffer 
de la impresora y otras bifurcaciones 
distintas de cero. Si siempre desea el 
salto al inicio de la ROM (dirección 0) 
puede referenciarlo directamente a 
una posición de memoria que bifur- 
que а 0: 


100 РОКЕ 23613,4 
110 РОКЕ 23614,61 


Pero tampoco este método resulta 
del todo infalible. La variable del 
sistema ERR-SP puede ser alterada 
según el desarrollo del programa. 
Comandos como RUN, GOSUB, 
RETURN o CLEAR cambian su 
valor, por lo que ha de elegir entre no 
utilizarlos o buscar otro método. No 
obstante, este método puede resultar 
bastante eficaz en pequeñas rutinas. 

El Spectrum tiene un display muy 
original, dividiendo la pantalla en dos 
zonas. La parte superior donde apa- 
recen los textos y gráficos y la parte 
inferior para la introducción de datos 
y mensajes de error. Es fácil deducir 
que si se elimina esta segunda parte el 
programa podrá seguir trabajando 
sin que se altere y sin que, por tanto, 
se pueda hacer uso del comando 
SAVE que necesariamente pasaría 
por la zona inferior de la pantalla. 


En la dirección 23659 se encuentra 
la variable DF-SZ. Según informa el 
manual se utiliza para almacenar el 
número de lineas de dicha zona, 
normalmente dos o más. Colocar un 
cero (POKE 23659,0) en un programa 
es lo mismo que eliminar esta zona 
Una vez más impedimos la interrup- 
ción del programa al presionar 
BREAK. pues el ordenador quedará 
confundido (léase bloqueado) al no 
tener líneas libres en pantalla para 
mostrar el mensaje correspondiente 
El único problema es que afecta a los 
comandos CLS y BORDER. pues 
ambos inciden en las dos zonas de 
impresión de la pantalla. Al intentar 
usar uno de estos dos comandos el 
ordenador quedará bloqueado. Pue- 
de pensarse en desbloquear antes de 
utilizar estas instrucciones y volver а 
bloquear después, pero resultaria ex- 
cesivamente tedioso. Afortunada- 
mente по es difícil desarrollar una 
rutina que simule los efectos de 


BORDER y CLS: 


8000 OVER O: INVERSE O 
8010 FOR Ү-О TO 21 

8020 PRINT AT Y. О, 

8030 NEXT Y 

8040 RETURN 

8100 LET C=BORD*8 

8110 FOR Y=23232 TO 23295 
8120 POKE Ү.С 


8130 NEXT Y 

8140 OUT 254.BORD 

8150 IF C<=32 THEN LETC=C + 
8160 POKE 23624.C 

8170 RETURN 


En vez de usar CLS v BORDER 
puede utilizar GOSUB 8000 y GO- 
SUB 8100. respectivamente 


La primera rutina es bastante sen- | 
cilla e ingeniosa, eliminando la in- 


formación de cada posición. pero 
dejando el color existente. Las dos 
comas del final de la linea 8020 


permiten "barrer" los 32 caracteres 
por línea (16 caracteres cada línea). 

La segunda subrutina no es tan 
sencilla. Primero realiza una conver- 
sión del color al código correspon- 
diente, de acuerdo a la tabla de 
atributos descrita en el manual. Este 
valor se almacena. El siguiente paso 
es cambiar el color del BORDER 
Para ello la línea 8140 envía un nuevo y 
valor de la ULA. Después, con ayuda 
de la variable del sistema BORDER 
(posición 23624) y de la linea 8160 
colocamos el nuevo color 

Este método es de los más utiliza- 
dos ya que no presenta demasiados 
problemas, como veíamos con los 
anteriores + 

Sea cual sea el método elegido, 
todo programa puede ser copiado. En 
el terreno de la duplicación del soft- 
ware existen dos procedimientos: co- 
pia del cassette a cassette y copia bita 
bit 


CASSETTE A CASSETTE 


Es un proceso simple en el que el 
único requisito es disponer de dos 


шинж LO QUE OPINAN LAS CASAS COMERCIALES um, 


a realización de un buen 

programa comercial по termi- 

na con la verificación de su 
mmm to funcionamiento. Pos- 

teriormente habrá de dotársele 
de las últimas innovaciones en materia 
de software de protección. Siempre hay 
alguien que logra vencer los obstáculos 
más difíciles, entrándose en una espiral 
que lleva a una enorme sofisticación en 
los dispositivos de protección emplea- 
dos. El uso del cassette ha permitido 
una gran difusión de la informática al 
ser un medio económico para almace- 
namiento de programas, pero se vuelve 
ahora contra sus creadores, quienes no 
ven soluciones claras al problema de la 
piratería del software distribuido en 
cassettes. Así nos lo contaba José Luis 
Domínguez, Director Gerente de In- 
descomp, una de las pocas casas de 
software que realizan programas para 
el Spectrum reconocidos internacio- 


nalmente. “Es un problema de muy 
difícil solución. Los ingleses —que son 
los grandes maestros— по han conse- 
guido resolver el problema, hasta tal 
punto que ya han quebrado varias 
empresas 


“Hemos estado seis meses 
intentando que la gente enten- 
diera que es el software.” 


El mercado español todavía no está 
lo suficientemente desarrollado. Es por 
ello que la típica piratería industrial 
todavía no haya entrado o al menos 
José Lúis no está muy convencido de 
que llegue por el momento. “Еп Ingla- 
terra sí merece la pena fusilar los best- 
seller porque hay un mercado muy 


amplio. De uno de nuestros programas 
Е! Fred— aparecieron 30.000 copias 
еп un almacén, y esto еу sólo lo que se + 
localiza esporádicamente. También sa- 
bemos que hay algunos comerciantes 
que hacen copias de juegos para rega- 
larlos con la venta de los Spectrum, 
pero eso no nos preocupa. Lo realmen- | 
te preocupante es la piratería del 
aficionado. Un chaval se compra el 
Bugaboo, se lo lleva al colegio y se 
hacen diez copias. Está claro que esos 
diez chavales eran diez potenciales 
compradores de esa cinta y ahora no lo 
son. Es un problema que en el futuro se 
va a plantear muy seriamente”. 
Desde el punto de vista legal poco о 
nada se puede hacer. En Inglaterra ha 
hay varias asociaciones para luchar y 
combatir la piratería. En España to- 
davía hay que vérselas con el funcio- 
nario de turno para tratar de explicarle 
lo de la propiedad intelectual, como 


settes, para grabar directamente 
de uno a otro como si del éxito del 
Шито single se tratase. Los expertos 

la materia aseguran que cuanto 
mejor. Pero 
calidad deja 


peores son los cassettes 
verdad es que la 


ucho que desear 


BIT A ВІТ 


Es un secreto a voces la existencia 
un programa llamado “la llave" 
pr aquello de que abre todas las 
Se trata de un programa que 
una cinta sin interpre- 
los. Los primeros bits suelen de- 
lerminar tipo de programa, su 
ombre, etc. Después siguen todos 
s que configuran el programa. De 
ista forma se logra una copia tan 
perfecta como el original 


«йаз 


e datos de 


CONCLUSION 


Esperamos que este artículo le haya 
sido útil para proteger sus programas 
adecuadamente, aunquenos tememos 
que será igual de útil a aquellos cuya 
afición favorita es desproteger pro- 
gramas. En cualquier caso, la polémi- 
ca sobre la protección de propiedad 
intelectual está por empezar y sólo se 
nos ocurre un medio infalible para 
evitar las copias: el abaratamiento del 


software 


ws contaba anecdóticamente: “Nos 
“hemos vuelto locos durante seis sema- 
sas para registrar la propiedad inte- 
lctual, tratando de hacerles entender 
qué era eso del software”. La ley 
llegará con retraso, como siempre. 
Mientras tanto los ingenieros del soft- 
ware ponen a prueba sus neuronas para 
la realización de nuevas rutinas. "Uti- 
lizamos subrutinas en código máquina 
ше hacen que sea muy difícil abrirlo. 
Pero siempre hay alguien que inventa 
ша rutina que destruye la rutina 
anterior, En una ocasión hicimos un 
cassette especial, cortando la cinta en 
ua medida exacta. Al llegar al final 
quedaba una instrucción que saltaba, 
pero tampoco era ésta la solución 
Realmente no hay soluciones válidas 
mientras se trabajecon cassette". Con 
el microdrive se podrán conseguir me- 
jores sistemas de protección, pero su 
precio no parece apuntar a un amplio 


sector del mercado. La cosa parece 


clara, hay que utilizar un sistema 
distinto al cassette, pero que no resulte 
tan caro como el microdrive, José Luis 
nos revelaba su secreto: " Tenemos ya 


*O se busca una solución 
concreta o la industria del pro- 
grama en cassette va a correr 
un grave peligro." 


un prototipo de cartucho que estamos 
desarrollando con una empresa ameri- 
cana y que esperamos presentar en 
noviembre: Será un poco más caro que 
la cinta, pero podrá competir con ella y 
con las ventajas de un cartucho (carga 
inmediata, evitar piratería, etc.). Se 
trata de un cartucho muy especial, pues 


FOR COPIAR 
EL S/MLILADOR 
DEVUELO 


se podrán cargar en ellos nuevos pro- 
gramas. Cuando uno se cansa de un 
juego se va a la tienda y se cambia por 
otro. Una máquina que estamos des- 
arrollando permitirá hacer una copia 
del nuevo programa en el cartucho 
viejo. 

“Está claro que nos copian muchísi- 
то”, reconocía José Luis Domínguez. 
Pero está también claro que el des- 
arrollo del parque informático en Es- 
paña traerá nuevos desarrollos de pro- 
tección hardware-software. Quizás es- 
te prototipo de cartucho sea sólo el 
comienzo. Por el momento la piratería 
de software en España no deja de ser un 
problema menor para las casas de 
software, quienes se muestran particu- 
larmente preocupadas por el futuro, 
como sentenciaba finalmente José 
Luis: “O se busca una solución concre- 
їа o las industrias del programa en 
cassette van a correr un grave peligro." 


Con los ordenadores. al igual que 
ocurre con algunos automóviles. sue- 
le hacerse referencia siempre al mode- 
lo y a la marca. Así se ove hablar del 
ZX8l o del Spectrum ambos prodne- 
tos de Sinclair Research (v a ve 
observa una cierta confusión entre 
ambos modelos. tan diferentes, cuan- 
do alguien dice: "tengo un Sinclair”). 
No siempre dos ordenadores con el 
mismo nombre v apellido son iguales. 
pero es obvio que el sofnvare que 
corre en ellos lo hace sin problemas. 
Esta circunstancia explica que para 
muchos usuarios hava pasado desa- 
percibido el hecho de que existen no 
una ni dos sino tres versiones sucesi- 
vas del Spectrum. En España sólo se 
han comercializado las dos últimas. 

Si es usted una persona poco amiga 
de crearse problemas. no se preocupe: 


VERSION 2 


eS se 


tanto la versión 2 como la 3 realizan 
las mismas funciones. Pero si es usted 
curioso y le gusta meterse con la 
circuiteria. puede que le haga ilusión 
echar una mirada а las entrañas de su 
Spectrum. Compruebe. en base a las 
Totografías que le ofrecemos en este 
artículo, cuál es la versión que usted 
pose 

La existencia de varias versiones no 
es cuestión de capricho. mucho me- 
nos en una máquina tan pensada 
como es el Spectrum. Se trata. como 
siempre. de ir incorporando a la idea 
original los nuevos avances tecnoló- 
gicos. En este articulo sólo prestare- 
mos atención a un aspecto: la posibi- 
lidad de sintonizar el Spectrum lo 
mejor posible con el televisor. Claro 
que. а esta altura. conviene aclarar 
que lo que aqui se diga valdrá para la 


segunda versión. va que la tercera 
permite realizar la sintonía de forma 
automática 

Una de las peculiaridades de los 
dos primeros modelos es la flexibili- 
dad del display, Flexibilidad que se 
torna en problema si lo que se desca 
es conectarlo a un monitor. Pero esta 
Nexibilidad le permitirá poder reali- 
гаг unos mejores ajustes, Para ello ha 
de empezar por quitar la carcasa para 
poder trabajar con la placa. siendo 
ésta su primera decisión importante. 
va que con ello se invalida toda 
posible garantía. Si va ha decidido 
dar este primer paso. retire los torni- 
llos situados en la parte inferior del 
Spectrum: suelte los dos cables planos 
a los que está conectado el aparato 
con sumo cuidado. va que no hay 
longitud suficiente como para desen- 


El cable "VID" (video). 
El interface del monitor 
del que Sinclair estaba 
muy orgulloso solamente 
lo hallar 
versiones modificadas 
del Mark I y 2. Cable 
plano en color del 
Teletext: Y. V y U 


localice los 
resistencias 


se con tranquilidad 
ndensadores 


bles situados en los alrededores del 
modulador de televisión y ya estará 
n disposición de hacer el ajuste. 


siendo distinto según tenga conectado 


й ordenador а un televisor o a un 


on Televisor 


Hay varios componentes que mere- 
xen la pena conocerse antes de proce- 
Wer a la sintonización del aparato. 
Además en la zona del moduladc 
icontrará el VID. que se analizará 
n su momento ya que tiene que ver 
on el ajuste del monitor. Los con- 
densadores variables son TCI у ТС? 
^ lis resistencias variables son VRI y 
VR2. Trabajando de arriba 
Sto es lo que hace cada uno de ellos: 
ІСІ controla el brillo. 

1С2 sintoniza los colores de E/S. 
VRI ajusta los colores azul/amari- 


VR2 ajusta los colores rojo/verde. 
Antes de continuar. asegúrese de 
ue trabaja con un destornillador que 
fo sea metálico v por supuesto tenga 
cuidado a la hora de apretar o soltar. 
puesto que hay que hacerlo con el 
aparato encendido 
multados de la sintonización en la 
л шайа, Para empezar. 
illo de TC2 con cuidado en ambas 
encuentre el 


а poder ver los 


име el tor- 


Jono тах fuerte del color. aunque éste 
ca débil. Esto se hace ajustando los 


ERSION 3 


ҮКІ. Una vez localizado el mejor 
color hacer lo mismo con el tornillo 
VR2. Lo esencial reside en combinar 
estos tres tornillos para tener la ima- 
gen lo más clara posible. 

ІСІ es el condensador que contro- 
la el brillo en la pantalla. Una vez que 
el color està а su gusto. este es el 
tornillo a fijar. De todos modos el 
brillo puede interferir con los demi 
controles por lo que habrá de ir 
ajustándolos poco a poco, Una vez 
completado los delicados ajustes de- 
berá tener una imagen cla 


Con Monitor 


Hasta aquí todo está muy bien para 
aquellos que quieran sintonizar con 
un televisor en particular. Pero para 
aquellos que quieran más tendrán que 
buscar un monitor que acepten en- 
trada de video compuesta y preparar- 
se para hacer un pequeño trabajo de 
soldadura. 

Más abajo del modulador y justo а 
la izquierda del hueco existente entre 
ІСІ y TC2. hay una pequeña línea 
птагсайа con las letras “VID”, Al 
final de uno de los extremos tendre- 
mos un pequeño punto de soldadura 
y al otro extremo un pequeño agujero 
a través de la placa. No es tan fácil 
acceder a esta linea puesto que está 
situada a lo largo de las resistencias 
situadas en la parte inferior del mo- 
dulador. 

VID” forma como una peque. 
frontera entre el port de salida (port 


El control del color y el 
cable plano del Teletext 
se sustituyeron en el 
Mark 3 por un 

dentro de la ULA para 
el autoajuste del color. 
Esto fue un paso 
importante ya que n—— 
los modelos Mark 1 y 2 
por mucho que se 
intentara ajustar la 
pantalla. en televisiones 
alemanas y japonesas se 
convertia en un 


de expansión) y el modulador. Es 
obvio que al haber un pequeño hueco 
en esta línea lo que habrá que hacer es 
un puente por encima del hueco. 
Cómo conseguirlo es cosa de cada 
uno. Una pequeña pieza de alambre 
bastaría, aunque lo mejor pero mu- 
cho más engorroso sería soldar est. 
ño desde el punto de soldadura hasta 
el agujero. De cualquier forma. una 
vez conseguido tendrá una señal de 
video en el port. 

Solamente son importantes dos li- 
neas en el port. que son la de video y 
la de 0 voltios. Estas están situadas 
juntas en la parte interior del port. En 
la entrada, donde se conectará 


1 el 
monitor. la linea de video va hacia la 
patilla central mientras que la linea de 
0 voltios va conectada a la carcasa. Si 
se quiere se puede adaptar el cable de 
UHF que viene con el equipo. De 
cualquier forma cualquier tienda de 
electricidad tendrá lo que se necesita. 

Todo lo que queda ahora es cómo 
coger la señal de video del рог. La 
manera más flexible sería con un 
conector y un bus de expansión. Por 
otro lado también se pueden conse- 
guir las señales de otro port como por 
ejemplo si tiene conectada la impre- 
sora, De todos modos hay que tener 
cuidado con algunos programas pues- 
lo que se puede causar un volcado de 
la pantalla por impresora si se man- 
tiene mucho tiempo conectada. Para 
aquellos que vayan más lejos como 
раға utilizar el monitor en el Spec- 
trum. lo mejor será comprar el сопес- 
tor debido para ello. 


COMENTARIOS 


Programa: Pbeenix. 
Tipo: Juego. 

Distribuidor: Ventamatic, 
Formato: Cinta de cassette, 
ZX Spectrum 16 6 48 К. 


Este juego de tipo Arca 
del 
mismo nombre que abunda 
ba en bares no 
muchos años. Nosotros con 


trolamos una nave espacial 
situada en la nave inferior 


de la pantalla que debe lu 
char contra cuatro tipos de 
listintos antes de 


nuve 


de es similar a uno 


los hace 


invasores 
poder destruir 
Estos enemigos se dividen 
pri 

meras pantallas son de mar 


ma 


en dos clases. Las dos 


cianos normales (con varia 


ciones entre ellos de color y 
forma) y la 


tercera y cuarta 


están formadas por unos 
huevos que posteriormente 
se convierten en grandes 
pájaros. Después de estas 
cuatro oleadas nos aparece 
ına nave de gran tamaño 
escoltada por otra escuadri 
lla de marcianos. 

El juego se carga sin diti 
cultad siguiendo las instruc- 


ciones de la cinta y una vez 
cargado se nos da a elegir 
con el teclado o 
joystick. de tipo 
A continuación. 


nivel de 


entre ju, 


con un 
Kempston 
se nos pide e 
dificultad 
prendido entre uno y cinco 
La calibración de la dificul 
tad está muy bien hecha y 
mientras el lo bas 
tante lento como para prin 
cipiantes, el cinco es para 
jugadores muy, muy rápidos 


que está com- 


uno es 


Cuando empezamos a ju 
gar suena una müsica dema 
siado larga para nuestro 
gusto y que puede 
parar, las dos primeras ve. 
ces que se oye es muy sim- 
pática pero a la tercera em 
pieza a hartarnos. Después 
viene la primera oleada con 
los marcianos que empiezan 
a aparecer por los bordes 
izquierdo y derecho de la 


no se 


pantalla y se van colocando 


en su posición de combate 
mientras se están colocando 


no disparan por lo que rc 


sulta muy fácil desrr les. 
Cuando están colocados to 
dos empiezan a moverse y 
disparar, la cantidad de tiros 
que realizan resulta excesi 
va, incluso en el nivel uno, 
por lo que resulta extrem. 

damente difícil pasar por 
debajo de ellos 


Una vez destruida la pri 
mera oleada vendrá 
gunda del mismo tip 


ina se 
iun 


que los marcianos sean del 


mismo color. Después de 


ésta aparecen unos huevos 
de pájaro que se desplazan 
por la pantalla lateralmente 
hasta que al cabo de algunos 
segundos nace el pájaro. Po 
demos intentar disparar a 
los huevos y a los pájaros, y 
debemos intentar destruir 
los cuando todavía son hue 
ya que no disparan y 


vulnerables 


vos 
son más 
Después de dos oleadas de 
la nave ma 


nave de 


pájaros aparece 
dre. Es gran 
tamaño que ocupa casi toda 
la pantalla y en la que está el 
jefe de los invasores. Para 
destruirle y ganar debemos 


una 


agujerear el grueso casco de 
la nave y realizar un agujero 
en la cinta que 
rodea el perímetro del plati- 
llo volante, una vez hemos 


corrediza 


logrado esto hay que dispa 
rar a través de los agujeros y 
destruir al jefe enemigo (que 


por cic 


mencando la 


a 

yendo efectos de sonido. 1 
distintas. pantallas están 
bien realizadas y los niveles 
de juego tienen velocidades 
correctus. Los dos inconve 
nientes que hemos visto 
consisten en que al poner 
nos un escudo protector an- 
tibulus no podemos dispar 
pero si movernos (justo a, 
revés que su homólogo de 
los bares) y que sus naves 
disparan démasiark 


PUNTUACION 
ADICCION 
PRESENTACION 
GRAFICOS: 9. 
ACCION: 4 
бирле ARAS а 
Programa: Polinomios 
Tipo: Educativo. 
Distribuidor: ABC SOFT. 
Formato: Cinta de 
cassette 
Spectrum 48K 


Este programa 
tratar el estudio de los poli 
nomios desde un 
primero de BUP hasta pri 
mero de carrera, Este espec 
demasiado amplio 
para poder tratarlo en pro 
fundidad y tanto. 


pretende 


nivel de 


tro es 
por no 
puede hacer un estudio ex 
haustivo de todo el tema. 
Esto no es óbice para que 
explique bien los temas que 
trae (hasta un total de 20) y 
de ejemplos claros. 


E] programa està. plan 
tado con una óptica abicrt 
en la que no se intenta guiar 

estudiante à unos temas 

n menú donde puede c 
el tema. a ratar. además 
dos los cilculos se hacen 
con un polinomio que pre 
viamente le introduce el es 
diante y que. puede ser « 
cualquier dimensión (hasta 
un máximo de 12) pudiendo 
bajar con el mismo poli 
nomio o con cualquiera de 


sus derivadas 


lintre 


las distintas opcio 


nes que tiene figuran: cálcu 
lo de derivadas, cálculo de la 
integral. cálculo de raíces de 
diversos tipos (enteras, frac 
cionarias. reales). máximos 
y mínimos. dibujo del poli 
sus derivados. 
1 


nomio y de 


cálculo 


áreas encerra 
or el polinomio y cálculo 
de volümenes 

La realización del pre 
ma es correcta y va acompa 
ñado de un manual 
completo y de fácil 
prensión. Como fallo se po 
indicar la lentitud de 
ilgunos cálculos en los que 


etc 


muy 
сот. 


hace esperar algo más de lo 


acostumbrado para un or 


denador (después de todo 
los ordenadores son rápidos, 


PUNTUACION 
LIDAD: 7. PRESENTA- 
CION: 5. CLARIDAD: 8. 
RAPIDEZ: 4 


UTI 


Programa; Artist. 
Tipo: Utilidades. 
Distribuidor: Dinamic 
soft 

Formato: Cinta de 
cassette. 


ZX Spectrum 48K. 


Este programa le permite 
crear. pantallas gráficas con 
gran sencillez y comodidad 
ofreciéndole un amplio con- 
junto de “herramientas” que 
simplifican notablemente el 
trabajo. haciendo que la 
creación de dibujos espec- 


tuculares, similares a los que 
traen muchos juegos comer- 
ciales, estén al alcance de 
todos. 

El programa se carga si 
guiendo los procedimientos 
normales y una vez puesto 
en marcha nos aparece un 
menú desde donde podemos 
elegir las distintas modali- 
dades de dibujo. estas se 
pueden mezclar permitien- 
do una amplia gama de 
posibilidades 

La primera modalidad 
existente es la de modo 
plotter. Aqui se nos permite 
colocar puntos individuales, 
líneas rectas y toda clase de 
curvas. También tiene una 
opción destinada a rellenar 
áreas de un color, con lo que 
se simplifica enormemente 
el trabajo. En modo texto 
permite la introducción de 
caracteres dentro del dibujo; 

| estos caracteres pueden ser 


los normales del Spectrum 
o de gran tamaño, especial- 
mente útiles para títulos 
Este apartado nos permite 
un mejor control de los 
bloques de la pantalla (8 * 8 
puntos) pudiendo cambiar 
el fondo individual de cada 
uno de los puntos. Otra de 
las opciónes de que dispone 
el programa es un editor de 
caracteres (UDG) que ann 
que su existencia vea están 
dur del Spectrum. su crea- 
ción y manejo no es excesi- 
vamente fácil 
para lus personas 


sobre todo 


que no 


poseen demasiada soltura 
con la máquina. El progra- 
ma soluciona este problema, 
еп parte. permitiendo la 
creación y modificación de 
estos caracteres, que pueden 
ser usados dentro del gráfico 
con el que estemos traba 
jando o salvados para su uso 
con otro programa. 

Una curiosa. peculiaridad 
de este programa reside en 
la posibilidad de trabajar en 
perspectiva y poder definir 
figuras — tridimensionales. 
para esto se dispone de un 
modo especial en el que 
todos los movimientos se 
realizan en perspectiva, per- 
mitiéndonos. trazar los di- 
bujos en tres dimensiones y 
afadirlos al gráfico general 
donde luego se pueden re- 
llenar los lados. 

Aparte de todas las ор- 
ciones indicadas anterior- 
mente dispone de las típicas 


necesarias para leer 
los gráficos en cinta 
ЕГ programa 


bien 
desarrollado y funciona a la 
perfección. aunque se echa a 


está 


notar en falta una opción 
que permita la ampliación 
de una pequeña parte de la 
pantalla a gran escala para 
su mejor manejo. 
PUNTUACION 
DAD: 7 
CION 
RAPIDI 


UTILI- 

PRESENTA- 
CLARIDAD: 6 
8 


Programa: Túneles 
Marcianos. 

Tipo: Juego. 

Distribuidor: Ventamatic. 
Formato: Cinta de 
cassette. 

Spectrum 48K. 


5i hay alguna característi 
са que sea común a la gran 
mayoría de los juegos. y 
sobre todo los juegos de 
acción como este, es la sen- 
cillez de sus principios y lo 
poco que se necesita pensar 
pará poder jugar. Y es justo 
en este punto en el que cl 
programa Túneles Marcio 
nos Пата la atención. Desde 
un principio hay un objetivo 
bien definido consistente er 
coger un cofre y abrirlo para 
llevarse el tesoro que hay 
dentro y para poder hacer 
esto necesitamos siete llaves 
que hay repartidas por dis- 
tintas partes del laberinto. 

Y si ésta es la presenta- 


ción típica de un juego de 
aventuras еп el que tendre- 
mos que recorrer todos los 
laberintos mirando 
cogiendo, dejando y hacien- 
do otro sinfin de cosas pro- 
pius de un explorador. la 
realidad es bastante diferen- 
te. Cada habitación del labe 
rinto está llena. de mons- 
truos que, como es normal 
EN estos casos, intentan co- 
mernos mientras que noso- 
tros con una pistola. inten- 
tamos matarlos a todos para 
pasar a la siguiente habita- 
ción, El problema es más 
dificil en las habitaciones 
que contengan algún objeto 
interesante (cofre. llaves) ya 
que este debe ser código 
antes de marar а todos los 
monstruos, si no lo hacemoa 
así. el objeto desaparecerá 
cuando queden menos de 
tres monstruos y deberemos 
volver a empezar a buscarlo. 

El juego es fácil de enten- 
der y tiene un manejo senci- 
lo por medio de un joystick 
o del teclado. Los gráficos 
representando а los mons- 
truos y al astronauta son de 
gran tamaño y de una cali- 
dad sorprendente (sobre to- 
do el del astronauta) que le 
da más realismo al juego. 
Los niveles de dificultad 
aumentan de habitación en 
habitación como era de es- 
perar y resulta bustante difí- 
G pasar de la tercer 

Las instrucciones de juego 
van incluidas (en español) 
en el mismo programa y 
todo el juego va acompaña- 
do de una serie de tonadas, 
algunas muy conocidas, que 
le dan más animación. La 
presentación es muy sencilla 
(no tiene ninguna pantalla 
de portada con un gráfico 
espectacular) y el manejo 
por el teclado es muy cómo- 
do y no plantea problemas. 

PUNTUACION: ADIC- 
CION: 8. PRESENTA- 
CION: 5. GRAFICOS: 8, 
ACCION: 7 


cosas, 


Y porque no sólo de aprender se trata, sino también 
de divertirse, cerraremos Todospectrum con un peque- 
ño repertorio de buenos programas. 

Les garantizamos que todos serán probados y 
verificados, ofreciendo una copia de la representación 
por pantalla de aquellos aspectos m; i 
del programa. Les prometemos también vigilar estre- 
chamente a nuestro maquetista para evitar que le 
vaya la tijera" en los listados de los programas. 


Barcos 


Con un poco de ilusión y grandes dosis de paciencia 
le auguramos una buena partida al popular juego de 
los barcos para la próxima navidad. Quizás sea 
exagerar un poco. a pesar del elevado número de 
instrucciones a introducir, pero no le exageramos nada 
al decir que es un estupendo juego con el que podrá 
jugar contra el ordenador, con una buena resolución 
gráfica aun no generando ningún carácter gráfico 

Por si acaso es usted nuevo en estas lides de guerra o 
desea que le refresquemos la memoria, veamos las 
reglas de juego impuestas por este programa 

l. Dispone de un cuadrado de 14 X 14 donde 
situar sus navíos. 

2. La flota consta de 1 portaviones (4 recuadros), 
cruceros (3 recuadros). 3 submarinos (2 recuadros) y 
lanchas (1 recuadro). 

3. Las naves no pueden tocarse, debiendo existir al 
menos un cuadrado libre desde cualquier posición 
vertical, horizontal o diagonal 

4. Existen dos posibilidades de juego: hundir la 
flota o jugar a puntos. El primer caso es el clásico 
juego de los barcos en el que el ganador es el que 
consigue destruir toda la flota enemiga. La segunda 
opción consiste en tratar de hundir el mayor número 


2 
5 


posible de barcos con un número de disparos limita- 
dos, acortándose así el juego (especialmente recomen- 
dado para nerviosos y ejecutivos atareados). 


Dado que existen dos modelos de Spectrum en 
cuanto a capacidad de memoria, indicaremos en cada 
programa la capacidad mínima necesaria. /6K indi- 
сага que corre en un Spectrum de /6К o de capacida- 
des mayores. y 48K que necesita dicha cantidad de 
memoria como mínimo, no pudiendo correr en el 
Spectrum de 16K. Muchos programas utilizarán los 
cos de alta resolución, en cuyo caso lo indicare- 


Y 
mos adecuadamente. Veamos un ejemplo: 


5. Los disparos son alternos, а excepción de 
cuando se hace blanco, en cuyo caso sigue jugando el 
mismo jugador, 

6. El ordenadorno repite nunca el disparo en un 
mismo lugar y cuando toca а un barco tiene la 
costumbre de dispararle aleatoriamente alrededor 
hasta hundirlo 
Jorge 


Autor: Turró Nogue 
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295 PRINT FLASH 1; 
13; "ESPERA" 
897 РВЇМТ ІМК 2; 
320 REM ASIGNACION POSICION DE 

BARCOS DEL ORDENADOR 
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Cada vez que vea un carácter “extraño” 
los disponibles en el Spectrum) bastará con que le 


busque en esta segunda línea, cambie a modo gráfico 


Notas gráficas 


40 


850 ІЕ х (р) ех im) AND Y (Pp) ву (m) 

THEN LET Gz 

855 REM COMPROBAR ESTAN PEGADOS 
8560 IF х(р)-1кх im) AND МУ (р) ву (м 
) THEN LET 041 

865 IF хір)жісхіз) AND yíp)syim 
) THEN LET Gz1 

870 IF xiplaxim) AND y(p)-1my(m 
) THEN ШЕТ Gz1 

875 IF po (а) AND w (p)+1=y im 
) THEN LE =1 

380 REM Coñéñosan, SoN G ERTIOES 
885 ЇЕ х(р)-1=х( (م) پا‎ -1 
ar THEN LET Geil 


IF x(p)*isx(m) AND y(p)-isy 
LET Gz1 
895 IF тру 2х (в) AND y (р) +1=3 
L 
IF хір)жізхін) AND y (p)+1=y 
LET б=1 


(m) THEN Ge 

905 NEXT m 

910 RETURN 

815 REM PREGUNTAS PARA INICIO 
JUEGO 


JP «0 
845 IF MdsQ THEN GO SUB 6300: 0 


o'TO 10 

950 PRINT INK 1;AT 20,0; "А QUE 
JUEGAS 7 

955 PRINT INK 2;AT 21,0; "Puntos 
apo o BUndir Codo SH a 

9áo INPUT Ув 

365 IF (EHRE 118 АМО JB CHR 
s 124 THEN 

972 18985 "E THEN? GO TO 1000 
975 LET 

348 BRINY INK 1AT 20,0; "Dine e 
tL numero maximo dispar 85 

985 PRINT INK 2;АТ 81, $; "maximo 
"Ма," disparos 

890 INPUT Nd 

0935, I" NdoMd OR Ndc« THEN GO T 
996 LET Mdshd-Nd 

$97 LET TTxNd 

338 BRINT INK Q aT 16,18,N4 
1000 REM ASIGNACIÓN 20680 

1823 BRINT INK ТАТ 20.0 "Quien 
empieza [ECHTE es 

1025 PRINT INK 2;RT 21,0;" TUsT 
o YOsY Ақ 

1030 INPUT КЁ 

1038 18 kc ¿SURE 116,880 ка OCHR 
$ 121 THEN 

Todd rE хаях i" THEN бо TO 2970 
1152 GO 308 

1151 PRINT INK 1;АТ 18,0; DISPRR 
05 JUGADOR 

1153 IF TT (100 THEN PRINT АТ 15, 
1164018 ТТс10 THEN PRINT AT 16,1 
1155 PRINT INK 2AT 16,16 

i189 TE YBa INE тон 
1160 шет 

1165 60 TO 1180 

1178 It 1150 THEN GO TO 7800 
1175 LET 

1128 БЕН DISPAROS DE gUgRDOR 
1182 PRINT INK 1;AT 18,8;A 

1145 PRINT INK 2;AT 18:0: Boorde 
nadas";RT a8,0;" 

1198 PRINT I 

="; FLASH 1 

ха. KES 2 

1200 IF x$«C 

Q THEN GO SU 

1203 PRINT I 

1205 PRINT I 

o="; FLASH 1; 


Bio Т се d За »14 THEN GO SUB 


4700: GO 12 
1215 PRINT INK à 
1818 REM CoORDERÓR. (5778 58яво 
JUGADOR y ASIGNAC. BRDENADOR 
230 IF B "ОТНЕМ LET $ 
1222 IF x$="b" THEN LET $ 
1224 IF x$="c" THEN LET $ 
1226 IF x$z"d" THEN LET $ 
1228 IF e" THEN LET 5 
1230 IF IHEN LET s 
1232 IF THEN LET s 
1234 IF THEN LET 5 
1236 IF THEN LET $ 
1238 IF THEN LET s 
1240 IF THEN LET $ 
1242 IF THEN LET $ 
1244 IF THEN LET $ 
1245 IF THEN LET $ 
1250 ҒО 3 
1255 IF ЕМ LET xzí«8 
1260 NE 
1838 00 he 
G! 
1300 RE NADA (Y) DISPARO 
g RSI UGRDOR y ORDENR. 
1302 РО 14 
1305 IF N LET vel159-8* (f- 
DET 
1310 NEXT f 
1320 RETURN 
1330 REM ANULAR COINCIDENCIAS 
DISPAROS JUGADOR, 
1332 IF djz1 THEN GO TO 1355 
1335 LET 815912221 
1840 LET 41-1 
1352 GO TO 1400 
1355 IF Dis+1 nu THEN GO SUB 7 
710: 80 508 4550: GO TO 1188 
1369 LET D (sti = 
1400 GO 508 83% 
2000 REM COMPROBRCION ACIERTOS 
DEL JUGRDOR de 2005 a 2365 
2005 LET A=0: LET c=Q 
2010 FOR п=1 TO 21 
2015 IF sex (n) P bz dH E THEN L 
ET Anil: LET сап: 
2020 NEXT 
2025 PLOT FLASH 0¡x+4,4u+4 
2027 ТЕ R=Q THEN 50 508 7322: GO 
TO 3000 
2029 REM Acierto Portaviones 7 
2932 IF с=1 OR сег OR c=3 OR сай 
THEN GO TO 2080 
2034 REM Acierto Cruceros ? 
2035 IF сз5 OR Cx6 OR ca? THEN G 
ЕЙ 2220 8 OR 9 OR 10 THEN 
си cm ca 
GO TO 2160 
2044 REM B MAD RL nos 2 
2258 IF с=11 OR Са12 THEN GO TO 
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8 5ТЕР 8 
1,ХХ44,444-0,2 
1)Хх%3.5,ш%4-П,1 
REM ASIGNACION 5 LANCHAS 
INT INK 1;AT 18,0;,"5 Lance 


'Q C0 C0 2» 03000009 03-4 


bus 


CO rr бос 
© 


1;xx+4,u+4,2 
К 1;ХХ%3.5,ш%4,1 


RO FO TOTO PO fO O FO RO PO PO DO PO RO fO PO 7 fO ВЭ FO RO PO PO fO 


ооо осо HOLT 
мю HHD 


б 
F 
4 
Li 
I 
I 
E 
0 
9 а 
EM_DISPAROS ORDENADOR 
1F TT<100 THEN PRINT RT 16, 
„IF TT<10 THEN. PRINT AT 16,1 
4 PRINT INK 2AT 18,16;TT;AT 
ë 1F_JP=1_THEN GO TO 3918 
38521 


ET 
0 TO 3016 
۴ gu THEN GO TO 7800 


2 


"+ 


LET ssress: LET 
IF 44841 THEN GO 
LET ddzi 

LET 0(55-16,9)41 

GO TO зё 

IF 0(55-16,4) «1 THEN GO TO 
LET 01(58-16,4) 41 

50 508 5679 
PLOT FLASH 1; INK 2;xx+4,w+ 


PLOT xx+2,w+2: DRAW INK 2; 4 


€6-001/06-J000G06G0 : сооб 4. 
ің 
га! 
E 
< 
ч 
н 
2. 
3 


14 

заза PLOT xx«8,v-g: DRAW ІМК 2; 4 
FE: 

3085 PRINT INK 3;RT 20,0;"Mi dis 
paro ya esta efectuado 

3090 PRINT INK 8,ЯТ 21,0; "Рага с 
ontinuar pulse una tecla 

Sess PAUSE 8: PLOT FLASH Q;xx*4, 
vt 

3100 REM COMPR.ACIERTO ORDENADOR 
3110 LET Яа-д: LET Сс=@ 

3115 9 па1 TO 8 

3180 IF s$ss(n) AND v=t(n) THEN 
GO TO 3122 

3121 GO TO 3126 

3122 LET Aa=1 

3123 LET Ccan 

3124 LET 9 (п) вп 

3126 МЕХТ п 

3128 IF nasi THEN GO TO 3140 
3130 GO SUB 7300 

3138 GO TO 1159 

3140 REM Acierto Portaviones ? 
3145 IF Cc=1 OR Cc=2 OR Cca3 OR 
Ccs4 THEN GO TO 5249 

3150 REM RCierto Cruceros ? 
3160 IF Cca5 OR Cc=6 OR Сса? THE 


0 


м оо TO 3289 
3165 IF Cc=8 OR Cc=9 OR Сса10 TH 
5158 REM Reterto Submarinos c 
1 i 
3ige IF cceli OR cala THEN GO T 
3185 ir Cc=13 OR Cente THEN GO T 
ә 
3190 IF Cc=15 OR Cc»16 THEN GO T 
573442 
3200 REM Aciertos Lanchas, 
3810 PRINT INK 2AT 9,8%; 
3215 LET RONRAO+10 
3217 LET ЈА=Сс: LET JBeCc 
3820 GO 508 
3825 50 
3830 GO 
3240 IF 
3845 ІҒ 
3) 53 AND 
3259 GO 
ET AOAO 
3860 LET 
3268 LET 
3270 GO 
0 SUB 7 
3280 15 
3285 IF 
7127 TH 
3299 60 
ЕТ AOSA 
3388 ti 5 
3310 б 08 7608: 0 
0508 
3320 1 то 3360 
3385 1 )«9 AND 9( 
10) «10 
3330 8 UB 7588: L 
ET AO=AD O 5 
3348 LET 80- 2765 сөзі 
45 1. - 
3358 6 8: go SUB 7600: © 
0 SUB : 
3360 IF 50151 THEN GO TO 3400 


EN GO TO 3380 
$378 60 508 6200: GO SUB 7500: L 
ЕТ AO=A0+4: GO TO 5715 


3380 LET ROsRO«4: LET 50141 


3385 LET ЈАв11: LET JBmi2 

3390 GO SUB 68502: GO SUB 7600: G 
O SUB 7900: GO TO 3508 

3400 IF So2=1 THEN GO TO 3440 
3405 IF 9(13)«13 AND 9(14)=14 TH 
EN GO TO 342 

3410 GO SUB 6200: GO SUB 7500: L 
ET ROsRO*«4: GO TO 5715 

3420 LEE ROsRO*4: LET 50281 

3425 (ЕТ JRs13: LET JBmi4 

3430 GO SUB 8250: GO SUB 7600: G 
O SUB 7900: GO TO 3500 

3440 IF 503=1 THEN GO TO 3480 
3445 9 (15) «15 AND 9 (16) «16 TH 
Ем 60 3460 

3450 GO SUB 6200: GO SUB 7500: L 
ET ROsRO«4: GO TO 5715 

3460 LET AO=R0+4: LET 503941 
3465 LET ЈАз15: LET uir 

3470 GO 508 6250: GO SUB 7609: 6 
9 SUB 7900: GO TO 3589 

3688 REM_COMPROBAR TOTAL ACIERTO 
3500 ЇЕ Poð=1 AND Со1=1 AND Соёк 
1 AND ЕСТЕН AND 50883 AND So3=1 
AND 151 )217 AND H 38) 849 AND 2 
19) «19 AND 189) 8 @ AND HESS 1 
THEN LET Ред: GO TO 99 

3510 GO TO 3980 

4200 IF GGaO THEN GO TO 4230 
4205 FOR usn TO 

4210 LET $(u)z0 

4218 LET t(u)=Q 

4220 NEXT u 


423 
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Ф 
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с 
т нне 0(82323032323 07124 | 00740923 1363) 


ASGAZS SANSASATLGA ON SIG 
morouzenpmmammor AZ 


RETURN 

IF _GG=0 THEN GO ТО 4280 

FOR usn TO 

LET 5 (0) =@ 

LET t (U) =ð 

МЕХТ у 

RETURN 

REM SUBRUTINR PARCIAL ASIG 
NACION JUGADOR 

LET GG=Q 

GO SUB 4400 

GO SUB 4500 

GO SUB 2505 

80 SUB 4 

IF G6=1 БЕРІП GO SUB 4550: С 
4300 

GO SUB 4450 

PLOT FLASH 1, INK 1;xx+4,u+ 


80 SUB 4802 
ЇЕ z"n" THEN GO TO 4360 
Go 75 


4 
CIRCLE OVER 1;XX*4,U 44,2 


1 
UB 4650 


N 
OORDENADA x$ POSICION 
5 JUGADOR 


NK 1;RT 21,0;"Letra 


97? OR A 11 
700: GO TO 4405 


To CAR COORDENADA 
NK 1;Xxx+4,4+4,2 


DENADA Y POSICION 
UGRDO! 
FLASH 1, INK 1;АТ 21, 


69 
992 
(9 


Y OR y»14 THEN GO SUB 
4808 


DO Qounidoid Do 


ë 

CO 
NT, 
о? 
UT 
Ye 

45 
SH 


e 
PRINT RT 21,0;"Numero "jy 
RETURN 
REM INDICAR COINCIDENCIA 
PRINT RT 20,0;" P 


BRIGHT 1 
PRINT RT 21,0;"Coincidencia 


4878 ВЕЕР 1,0: BRIGHT 
4575 PRINT ара 5 
455% REN REpaes, 

LETRA ASIGNA! 
4825 PRINT AT 20,0; Letra PRE 
4830 REM. d HORIZONTAL ¿UE 

NTRL /UERT ICAI 
4855 PRINT INK 1AT 20,0;" “8086 | 
0 deseas 
4660 PAINT INK 2;AT 21,0;"Horizo 
ntalaH o Uerticalau 50 
КИЖИ 

u$ CHI 118 RND н 

8 184 THEN 00 TO 225580 ú$ CHR 


4675 PRINT RT 20,0;" 
4680 PRINT AT 21,0;" 


URN 
1900 ВЕТ INDICAR FUERA DE RANGO 
FLASH 8: BRIGH 
PRINT AT 21,0, Fuera de ran 
BEEP 140: BRIGHT e 
PRINT АТ 21, 


-BORRAR COORDENADA 

CLI VER 1,ХХ44,844,82 

T ELA ASH Q; XX +E +R 

E US 1; хх+4,9+2 

REM 7 CONFORME POSICION A 
астом JUGADOR 

PRINT RT 20,0;" 


RINT INK 1,8Т 21,0;"Esta c 
e ? МонМ Šias 


ы НЕТ HM AND Q6 OCHR 
PRINT AT 21, 27% 
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(m) EN Eos ЕТТІ 
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AN PEGADOS ? 

Gir (m) AND t(p)st(m 


zl 
iss (m) АМО t(p)at im 
. 
Ч 25 (m) AND t(p)-1stíM 
= 
935 ІҒ =$ (m) AND t(p) 181 (m 
THEN LI mi 


ә BEM 5Е TOSAN pe ЧЕРТСЕ ? 
(m) t(p)-1st 


5 aci im) AND t(p) «iut 

LET GG=1 

E ТЕ si D fase iN) AND tí(p)*iat 

ат ТЕ si l tans (а) AND t(p)-1at 
Eu GG»1 
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7710 PRINT AT 19,0". 
7720 PRINT AT 20,0;" 
7730 PRINT AT 21,0; 
7740 RETURN 
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-CLUB DE USUARIOS, COMMODORE- 64 
SPECTRUM Y ORIC 


«CONDICIONES ESPECIALES» a Centros de enseñanza, alumnos de 
informática V clubs de usuarios. 


PONEMOS A SU DISPOSICION «EL CATALOGO» 
DE SOFTWARE MAS Y MEJOR SURTIDO DEL 
MERCADO PARA SPECTRUM, COMMODORE Y ORIC. 
ferta de verano. solo hasta el 7 
SHIWAY a са й ice pl, cpu 
СРВО БТ шең i 
P.V. OFERTA 


за 26 320- 


P.V.OFERTA 
B montor DATALEC, con sı partali 


55200- таашасу deai para presentan de айх y ro 


A+L centro de formación. Informática general y 
BASIC. Prácticas con COMMODORE 64. 
INFORMACION: c/ Manso, 17 tel.: 325 87 71 


SE BUSCAN, los mejores PROGRAMADORES. 
Pagamos excelentes royalties. Garantia y seriedad total. 


Nombre . Dirección 
Población Provincia 
Distrito Postal Teléfono . 


BOLETIN DE INFORMACION Tel. 21910 90 
remitir a 
SOFTWARE CENTER 
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Avda. Mistral 10 1D izq. BARCELONA 


эд: алєслллахлслсахааалслахахзил:тч/ 
Ё шаша 
fi | 9 XAR FOR $z1 nor (88: PRINT AT 5,2 
: ;RT 5,31 NEXT 5 


iy BRiNt At 1,1; Este es un pr 


Si es usted un afortunado que dispone de una ograma para BHalmacenar la 
variada colección de cintas de programas: si es un Si todas Қ Ара Pet TRU ЕЕ 
poco desordenado y si tiene un microdrive. le ofrece бозо se indica B 
mos la posibilidad de que ponga su vida en orden al BERECUERDE 
menos por lo que al catálogo de programas se refiere о AN 

Con este programa. diseñado especialmente para el mayusculas 38-AL anadir fi 
almacenamiento de datos en microdrive, puede llevar chas desaparece яй el fichero а 
su registro particular de programas. indicando código а A 88 20708 БООЛ 
nombre. si es inglesa. e incluso si se trata de una cinta es inglesa. 8-Еп caso de ^ 
original о copia BRERK d&b& cerrar ЕН Los Ficheros 

Recuerde no retirar la cinta del microdrive hasta (059858 aT 18,1; "PULSA TECLA" 
haber finalizado sus operaciones y. en caso de BREAK 19 60 508 108 А 
cierre los ficheros (CLOSE 4) para que no se le гә CLS PRINT RT 0,0;"= 


escape nada (léase para que todo quede grabado) 
Por supuesto. le aconsejamos que amplie el programa 


» d en sus os datos el número de 25 FOR S31 79,28; PRINT AT 5,2 
para sindicar en sus futuros datos el número d E НЕ ыы 
todospectrum de donde lo obtuvo За Кайн 17 PRINT AT Ёа; "А"; 
r êa Ea ak ei c GP 14 6; ^0 
Autor; Javier Garcia Ariz l FLASH 
HANES 
1 REM JAVIER GARCIA ARIZ -198 si HPA HHR E TEBER EH ААР 
S CLEAR : C RDER 0: PAP 5° 
Ена НКЛ БЕ 852180 м 48 CET USTINKEYS: IF V8="" THE 
10 CLS : PRINT RT 2,0; "жанша GO TO 4 
зихвлихчивайлиийнийаниийн"ЇНГ 81 45 IF Úsa"A" THEN GO ТО 80 Ё 
ба PRINT RT 17,2;round 
63 ВЕЕР .25,0: ВЕЕР .25,0 
65 LET ya: LET ха?: LET міну 
LET xizx 
70 LET 9823; LET («17: LET 918 
ә: LET fief 
Aunque esté en baja forma o incluso aunque no sea 30 LET tmz3: LET 18:82 
partidario del boxeo. nos permitimos sugerirle que 188 BRINT BT yl, xii" BT зана 
elija contrincante. se meta en el cuadrilátero у 1х1; ЙТ Vit ы '5; INK 2;А 
perfeccione su gancho. Al principio su oponente le T aiia 49 jh SABER! ee. "ШР TERR 
hará besar la lona dejándole KO con gran facilidad, ds T FRX; yin 
5 у: LET 
pero es sólo cuestión de tiempo 20 P 
Dispone de tres asaltos para machacar a su oponen- 91+1;" 


te y ambos рй 


les son ambidiestros, es decir, preste 
atención tanto а su izquierda como a su derecha, El 
árbitro es muy severo y no le admitirá golpes bajos 

La resolución gráfica es muy buena, no faltando la 
chica que anuncia —cartel en mano— el número de 
asalto en el descanso. Buenas gráficas. buen juego y 
buen sistema para desahogarse 

Notas gráficas 
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Autor: P. Stanley 16K 
(5 1 BORDER 5: PAPER 8: INK Q: C 

2 REM 0 P. STANLEY 

5 LET 5120: LET 38.51 

3 GO SUB 7000 

12 GO SUB 000 

15 LET roundai 

20 GO SUB 9582 

32 80 SUB 9550 
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52 IF 
58 IF 
80 IF 
75 80 
ӨВӨГ, 
INPUT NOMBRE DE EL F 
ČLS: INPUT "NOMBRI 1 : 
тойа? TM UT NOMBRE DE EL F S¿¿QPEN 4 "M"; 1,28 
G 3 d 
100 FOR баз ғ ‚19: PRINT АТ 8,1 qx Bros PRENIA нет 
СУН ЦЭС р 29 «as ТАРОТ R4; iP co z 
2 2 pas se NPUT 84; 
g8 РО: kong? TAC coo 89:10,488 4 торж 339 ren 
4, n 
| ALO, INPUT "NOMBRES; ;NS: IF LEN $49 PRINT AT чИ 
G n ; 
130 INPUT "ES INGLÉSRT:";IN: IF 448 NER n. 1f AIS THEN LET Az 
LEN 16>2 THEN GO TO 120 2. IF A=2 THEN GO 508 1808: NEXT 
оф IP LEN ORB THEN GO TO 130 ° A 
T » 
168 PRINT а? 8,1407 А,Б; NE; AT 55 S 5 
125; I8; 4 ң EU 
180 NEU ын EOR ESTO? (861) e Akn PROSE азах UD TO 
A Ad арай AR ASNT тазлар SHE сапра 
] 17ے‎ NEXT at Ч hi D LET A= EIZBS INTERFACE: PRINT : PRIN 
190 STOP D. 
200 PRINT m4;C: CLOSE 84: CLS "PES ЕЕ Ey PICHERO?: 
PRINT "FICHERO GRABADO": 80 TO Q$a$ LPRINT " LISTADO DE PROGRAM 
TBO iA 8128: А АЙТ jI 82% IF Caes HEN THEN 80 TO бөө 
^ n , 1 0 5 ж“ 
“ТАТ фас 17:87 84:31) 17: NEXT 850 INPUT 84;N$;I EHE CR. 
a 562 LPRINT C "IN 
578 GO TO 639 
692 CLOSE 84: GO TO 20 
Eo aa ata © Чи т, ERUIT Ын 
Е жүзі хад: 
НӨ ыш. 2; ot m 31831417 BEEP ad? BRINE RI S 
ЖЕГИН e О рда THEN co то өзге 
! AND 1810): Md 
3808 IF FY THEN GO TO 2 
499 IF TN 64510«254 THEN GO SUB 3019 PRINT RT f PEU ا‎ 5 
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y+ HEN ЧЕТ H 
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588 IF e THEN LET ese-(e-1 Атан iss iM elsi ‚кї, РАРЕ 
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A CREAR FICHERO 


B LISTAR FICHERO 


С IMPRIMIR FICHERO (con rs) 


D ANADIR FICHAS y 
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PRINT "FICH 1000 LET JASINKEYS: IF 08495 THE 
PRUSE 150 N GO TO 1280 
Go TO 1018 RETURN 
3592 PRINT ат 47: 1169 HEN 85)” LET faf+(f<17) ШЕТ 9=9+ (9 ‹ 
8518 LET roundsround+1: IÉ round 9540 PRINT BT (124911 ап өч 
54 THEN LET round=3; GO TO 6622 1 рид 4 ЁС 31: qi AT. ЦЭ 
85 "Rreparase Pa à AT f«2.9, ^ , 
г "A INK 6; e 4” 
Ши 91=9 
Р 19,24; 3542 IF RTTR (2,7) =50 THEN IF AT 
8525 LET у=у-(у›а): LET хах-(хэ7 Fon 122261542. qc Т бл xi; 
8530 PRINT BT gloxij ER EXT f: PRINT AT 21,0; ud 
IRL EAT IQ LHD X1: gf TO 62 
T Wasi ы ARA ЫН А. DR 8545 ВЕЕР ,1 NEXT i 
; PAPER бунт у+2,х; 9 3000 RESTORE 9 LET Ғад: LET 
y: LET хїзх Ap OR FE ta” цас 5 NO 
?: x 
8010 DATA r,53 Peta ass 
БРЕСТ: 87) 2522164428 
3022 DATA 195, f,f,f,129,19 
5,254,254 252, 2,65; Fi tit 
3858 ЗАҢ f, f ЕА "m 254 
,88,56,127,іг 
9035 DATA 1,2 UM 
2745: (458, 127 Š JE 145 
324570474706 185,94 
56,80,60,50,2 106 
4103, i08, 40,4 
$050 бата 28 126, 
252,245,240,2 40, 
848,452,126:8 8 
3050 DATA 56 124 
,126,63,31,1% 1,63 
¿125,124 248, 
3180 8 N 
8500 I ЕО 8: 
PLOT 5 15- f: 
ORAL 14 ий 45 
951 ІМК P 
61 ‚85; ¡A 


мк 2 
RENE BT 4,0; CS; RT 4, 


I 

Р 28,28 
PRINT_AT 8:8! “ФАК 2; “PUNTOS 
NK O;RT 5,26; "PUNTOS"; INK З 
118,8) "RONDA" AT 15,26) "TIEMP 


o RRENEN AT 8,2;51;AT 8,28,52 
5 RETUR 


560. FOR [=1 TO 4 52 
zi fo ia: КЕ üt yl, 

T у141,Х1:"ф yagi 8I х1 
ЕВ 2; TM х1; 


PAA Gg =D NNA 


ширэг харш GG Cr- 
tao: NUBE JODA р 


aao 


{НЕА FOR 0=25 ТО 35 
EXT о: FOR o=1 T 
FOR o 
Diu х1 о 
ví, 
Ат у1+а,х1;" ' ANT xt 
ETE ет оудефану: LET xiexiexs N 


Sólo RETURN 


x< DO 


Verdad que 
un campeon 
juego que 
боп que op 
tarte prim 


Soto puntuan Los golpes a Là 
чага: Pueden llegar a dejar 


Minas 


¿Qué le parece ir a recoger huevos de oro? Ese es el 
objetivo de este juego, recoger el máximo posible. 
pero no se lo pondrá nada fácil. pues su camino se 
encuentra plagado de minas e incluso con un pequeño 
enemigo que corre a su encuentro con muy malas 
intenciones. Afortunadamente en su camino podrá 
recoger hachas con las que destruir al enemigo, 
explosionar una bomba o destruir un muro. 

Aunque parezca sencillo le aseguramos que no es 
fácil hacer una buena colecta de huevos: dispone de 


pocos hachas y un número de vidas limitado. 
Notas gráficas 
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QYRXex/HIJKLMNOPORSTU 
Autor: P. Stanl 


16K 
кон) BORDER 2: PAPER 


‚5 REM à P. Sjanley (21.2.82 
13 05 sU фә22 
15 LET Май 
20 GO TO 6030 
52 ВЕЕР ү1,-10 
55 LET 1183 
: $8 BRINT ЯТ 0,13;"kk — Max.Pun 
ЖЭ % 
2$ PRINT BT Vx U mi INK буй 
х;а - 
ita CE LEE y YA Boat гай > (IN 
31358158: СЕТ y TV * (IN 65278225 
3) - (IN 645103284 
128 LET asATTR Y ЇЕ SCREEN 
ИТТЕН THEN ач 7 
184718 аз? THEN TF dg» W^ THEN 
cö То 5000 
23 IF ая? THEN LET ysy1: LET x 
xx 
139 IF an70 THEN ВЕЕР 01,20: L 
ET 58580410: N 2,6; 
$c; IF 5c/8 (852672) HEN, 
PRINT АТ ё " 
OR 1119,6. Eé 8 o0; міх 
PRINT Я + Me 
itio qe 2 
E Ч ds ыр 80206. Le 
198, PRINT AT nyon "i; IF ВМО» 
$K THEN PRINT Avi аха: INR B 
dos LET mylsmy: LET mximmx 
210 LET myuny+(.5 AND d SENSE 
AND Ju ШЕТ пхазх+(. ND mx 
0) = a МО Ххх) 
715 IF АТТА (8йу,лх)и8 THEN GO T 
o 5008 
Q189. PRINT RT ny,mx; INK в; BRIG 
; 
940 IF RND<.2 THEN PRINT RT АМО 
*18+2 ВМ 48844: ДЫҚ Bi BRIGHT 1; 
Ё KE RNB3.9 THEN PAINT INK 4 
BRIGHT 1/AT 8мра18-8, AND 
999 GO TO 199 
5902 18 уз: OR 31241 OR хэй OR ха 
30 THEN GO TO 125 
5005 FOR [280 TO 2 STEP -5: BEEP 
02, f: NEXT f 
5010 LET айв" 
5030 GO TO 13 
5500 PRINT RT е RC 
BT уух)” Ef ass; 
se LEF пуат? Abra 4, EE 


RINT — Misc 


6 
1 
$ 
а 
ij 8: 
6 2 
ТО 7: FOR 9 
NT INK 9; 
f: NEXT NÉXT 
5007 LET lisli-1: IF Li«»à THEN 
29,170,550 
213 FOR 912 TO бо. NEXT q 
6080 CLS : PRINT AT 5, 81 Ínuense 
1; "SE ACABO! II’ 
8225 PRINT AT 8, ¿97 INK 8; BRIGHT 
1," Punto$.... [3 
9425 таса ‘THEN LET hs=sc; PR 
INT 44" Bien hecho- tro juego! Т 
7: GO TO 6030 
5027 PRINT ''" Maxima puntuac 
ion "¡hs 
8832 PRINT " Presiona 
1 (dificil) c 
8040 IF INK ' TAND  INKEY § O 
"2" THEN GO 2 
8045 LET $K INKEY6="1") + 
(.85 AND IN ") 
5952 сыз 
7998 FOR га 21: PRINT RT f,0 
L'O AT 1,3 “T N 
9 FOR fx 29: PRINT RT 1,f 
1797; AT 21, NEXT f 
2082 FOR ga (7 АМО зки, 85) +( 
14 AND зка. ЕТ S*RND428: LET 
f =s END +19: х«ІМТ (RND&9) жа 
+1: IF f29 LET faa 
1838 FOR ўа f: PRINT RT х,у; 
7040 NEXT y 

Т SERND+17+2: LET íss4RND 
1185 LET REIN 18404147 ¥242? IF 


f320 THEN LET_f=20 

7062 FOR yss TO f cp AT у,х; 
"$": NEXT 18: БОС 

7380 FOR fal T 

саза LET INO LET x=RND+2 
+ 

7448715 SCREENS (y,X)*"" THEN GO 
7420 PRINT RIGHT 1; INK &;RT y, 
o NEXT 

5508 FoR газ то 

i LET 414009182: LET x«zRND«2 
+ 

7520 IF SCREENS (Y,Xx)="" THEN GO 
TO 75610 

256% PRINT INK 5;RT yx; "ж": МЕХ 
7858 


Q FOR ful TO 5: PRINT AT E 
Ra a +1; INK 4; BRIGHT 


; NEXT 
788 БЕП Hu Т, xal: LET ylsy: 
их 
7540 LET my=INT (8М0911) +10; LET 
MX=INT (RND*18) +12: LET ñyismy: 


LET mxiamx 
1585, Еи 5040: PRINT RT 8, Pun 


3958 ¿b ro 50 
9999 FOR (sUSR "a" TO YSR "9+7: 


READ 9. PORE xT 

92107 га 24; E 8,183 153,66,36 
223 8,88,80,54 

4824 04737230 240:93/186,72,92,2 


2,54,195,26,24 

9630 DATA $i 

$,0,8,73, 42,28 

9840 бата 4,14 

$500 PRINT ÍNK 224 
8882 ғ faQ TO 4: PRINT ENS 5,8 
1,0,8) BRIGHT 1,7Же: FOR 1 TÓ 
8812 PRINT AT f,9-1; OVER 1; INK 
2, BRIGHT 1;"X^; INK 5; X 

9620 IF SCREÉ 80149531) >" THEN 
PRINT INK à; PAPER 7,ЯТ 7,9-1," 
deco ВЕЕР .24 50/2 

9849 NEXT $i PRINT AT 1,31" " 
8645 PLOT 18,173: QRAW З,-10: DR 
AW 4,10; PLOT 80,173: ORAW 7,-28 
9650 PRINT “"Recorre el laberint 
o recogiendo huevos, &vitando la 
5 minas y al МОН 

9700 PRINT INK 6773: coges un ha 
cha podras des- truir Los muro 
$, minas e inclu- so al enemigo 
8% avanza.” > 

780 PRINT “"Dispones de З vidas 
, Pero se te dara una mas cada 5 


Aunque no sea usted un fanático de la lingúística, 
más de una vez se habrá preguntado cómo podria 
acer que su ordenador pusiese acentos o tuviese 
teres españoles como la N que evitasen el 
embarazoso problema de poner ano en vez de año, por 
ejemplo. La cosa es sencilla: ¡sólo ha de crearse su 
propio alfabeto! Y puestos en materia ¿por qué no 
cambiar a un tipo de escritura que permita 64 
caracteres por línea? 

Todo es posible con este programa. Tiene todos los 
caracteres. del código ASCII excepto los que se 
acceden en modo extendido: la ñ se obtiene con 
SYMBOL SHIFT y 2, la N conS YMBOLSHIFT y 6, las 
vocales acentuadas se obtienen pulsando primero 
CAPS SHIFT * SYMBOL SHIFT, y después la vocal 
correspondiente: se puede borrar con DELETE; tiene 
un BEEP de aviso de fin de línea, otro de última linea y 
un tercero de pantalla llena 

El texto escrito en la pantalla se podrá pasar a 
impresora o almacenar en cinta de cassette, si se elije 
esta segunda opción se puede guardar en una cinta de 
sesenta minutos aproximadamente 90 pantallas por 
cada cara, lo que equivale a un total de 1.932 lineas de 
64 caracteres, es decir, el contenido de un libro de 
bolsillo. El programa permite también leer estas cintas 
para lo cual pregunta al principio si se desea leer o 
escribir. 

Este pequeño editor utiliza por tanto un juego de 
caracteres propio que se almacena por duplicado y que 


acuerdo con la tabla que se incluye a continuación. 
Una vez más queda demostrado que los límites en 
materia informática sólo están en su imaginación. 


arga Caracteres 
663 


=31832 ТО 32592 STEP 8 
СЕК D IDEGOEONS et 


сіл оь 
6666666 
т 
-20 
an 


Na; POKE f4n-768,a« 
за NEXT n: BEÉP .01,0 


: PRINT "O.K. Caractere 
$ cargados": STOP 


Autor: Jesüs Alonso Rodríguez 16K 
Ld 


20 CLEAR 29663 
30 PRINT AT 10,6; "CARGANDO CAR 


35 INK @ 

40 LORD "caracteres"CODE 31064 
,1536 

45 INK 

so шы RT 10,5;"PRRE LR CINT 


12, PULSE CUR 


A REN ð 

Cour CLR": PAUSE Ф 

10 Inicializacion 

110 TÍN "LEER O ESCRIBIR ? "j 


120 IF AN THEN 50 ТО 400 


оп hacha podras des- 
5 muros, min e inclu- 
80140 que avanza. 


de 3 vidas Pero se te 
à màs cada 590 puntos. 


prc ud Z.....Rbajo 
Is... Izquierda P... Derecha 


ао Ven өтт 
оз» 


$918 " THEN GO TO 991 
$920 
$993 
"ew 
688233 THEN BEEP .3,20 
130 IF b$(1)="e" THEN GO TO 150 1200 IF PEEK 2368923 THEN POKE n 
140 Go ТО 110 1855: BEEP .5,20. GO TO 3000 
150 Сіз : PRINT RT 0,0; B ";CHRE 131242020 1202) 
8:: BEEP .01,0 200 Sub Print = A 
162 LET n229664: LET сте 2018 E 88! Бойы 20607,1 
200] Bucle escribi 20: LET 
80 E 0: LET акСООЁ INKEYS: Er] PRINTS ¿CARS a;cHRs 8; OVER 1 
ВЕЕР .01,0 27%; cHRS 
1005 ІЁ а‹1г THEN GO TO 1000 одо” RETURN 
1010 IF a=13 THEN PRINT 207920; 210 Subs егіп B, 
СНАЯ Bi. POKE һ,1з: LET man41: б 8110 CHR 
б TO 1190 2120 POKE 23008,86. POKE 23607,1 
1020 IF a=12 THEN GO TO 2500 NS Б Ч 
1039 IF a=14 THEN LET c=1° GO то 2132 PRINT OUER 1,CHRs a; "N" CHR 
1040 IF 4277 OR 8487 OR a=109 OR 3415. RETURN 
1048 ir НЕМ THEN LET 120: (2297 339918 Sub. mom - ñ 
FERE ин 468) 112888 3390 ^,a: LET n=M+1: GO SUB 
8111) 11272085 5 25 3 
=2 THEN GO ТО 100 3113-100) 1931 (12112) 915 (8787) +9 
1259 ORE па ге? m=m+1: GO SUB 2330 POKE m,a: LET n=m+1: GO SUB 
1100 PAUSE 0: LET a-CODE INKEY$: 451152 1011160 
1165 18 4122 THEN GO TO 1100 ¿a "i dg E ea 
1110 IF a-13 THEN PRINT CHR$ b'" Siga ONE м.а: LE RR +1: Go sus 
! igna Sigo OKE m,13: LET пев+1 2420 ГЕТ, 2391 (а= 12) +91*‹ае=в?)+э 
1 (а= +(а=1 
1120 IF a=12 THEN GO TO 2600 3 9 d 
1130 IF а=14 THEN LET c=1. GO TO Spoo (^E Mra: LET Rsm+1: GO SUB 
1100 © 2440 GO TO 1100 
1140 IF 2277 OR 3-87 OR а=109 OR 385 sue: DELETE - A 
1148 ie ЧЕМ Paen LE 921238 (a сө? EE БЕТ Bengt 
5 = (а= 
111883:4519:: 11854 tastos) staet 3 . S885-25 "PERK “өв O IS 
= + *í(az cz a ө 
5413) 21823 in 2528 PRINT CHAS 5;"É ";CHR$ в;сн 
1150 POKE m,a: LET n=n+1; GO SUB 2332) 80 то 1000 
2100 i * 350 Sub. DELETE - B 
1180 IF PEEK 23688=7 THEN ВЕЕР, 22 ОЕР 
1190 IF РЕЕК 23689=4 АМО PEEK 23 2818 PRINT chê 8) 


вьоөоооосавовоноо- UU 


6n66 CONGO 


т 
BIS 
Mz 
4 
о 
c 
c 


TRENT “DESEA 
' THEN COPY 


IF b$il)z"s 


ES "DESEA 


IF бтз" 


INPUT "DESEA 


IF b$(1)=" 
GO TO 3020 
Sube el 


T 
VERIFY "texto 


2 RETURN 
ioo ONG Bucle lectura 


5" 


ЫН 


ә 
_Pantal 
РО 


La LL 
КЕ 23607,60 


ena 


IMPRIMIRLO 7 


GUARDARLO EN С 
THEN GO 
BORRARLO ? 
THEN 50 TO 100 


o 
DE 


a 


sus 


31 


"jb 


cinta 
29664 , 1400 
ODE 29664,14 


4010 E РЕЗЕРВКЕ LA CINTA Y P 


4920 LORD ТОСЕ 29504,1400 
4232 INPUT "PARE LA CINTA Y PULS 


Cos ENLEB 288 

4948 CLS : PRINT AT 0,0; "B'";CHRS 
4050 LET mz2366 

4100 LET azPEEK LET m=m+1 
4105 IF a<12 TH 10 

4110 IF а=255 Т 

4120 IF а-13 ТН 

CHR$ 8;: 50 TO 4100 

4130 IF а=12 THEN PRINT CHR$ Š 

0 "¡CHRS 8:2СНв% 8; TO 4100 
4140 GO 508 2000 

4200 LET а-РЕЕК m: LET m=m+1 
4205 IF atta THEN GO TO 4200 
4210 IF a=255 THEN GO TO 4500 
4220 ЇЕ а-13 THEN PRINT E 
U”; CHRS 8:: GO TO 4100 


A o] 


DIRECC. 


31832 
31840 
31848 
31856 
31864 
31872 
31880 
31888 
31896 
31904 
31912 
31920 
31928 
31936 
31944 
31952 
31960 
31968 
31976 
31984 


8 0008 LA A ЕИ TI 


31992 — 


32000 
32008 
32016 
32024 
32032 
32040 
32048 
32056 
32064 
32072 
32080 
32088 
32096 
32104 
32112 
32120 
32128 
32136 
32144 
32152 
32160 
32168 
32176 
32184 
32192 
32200 
32208 


LUI E o Ib d EE 20 HPS b R RA E 


эоссоссооссосссоссоссосососсососсоссососссосососсососсомкыссоксеосоо 


DATOS 
0 0 
4 4 
10 10 
о 4 
14 8 
a£.» 
e e 
4 0 
4 8 
4 2 
0 0 
0 0 
0 0 
0 0 
0 0 
0 1 
14 10 
2 6 
14 2 
14 2 
10 10 
H 8 
12 8 
14 2 
14 10 
14 10 
0 4 
2 0 
1 2 
о о 
8 4 
14 10 
6 0 
14 10 
12 10 
14 10 
12 10 
14 8 
14 8 
14 8 
10 10 
4 4 
2. z 
10 12 
8 8 
4 6 
9.12 
4 10 


Buena coZ зохЕКы ЗососсьЗохоёобитьэ 


юэ 


--гтхэтвБэюкюиЕБКи2 3 оБьэхтШьтьтьэ 


= 


=юө шк шкы кы кюк ососк Ex ш= кь кюосш=осюыш==т= 


КомеоьсоесььосоЕьтьтэ 


NEE 


әсоссоссосососссососсоссохсо-ссосососсссососсосососсососхксоськоссо 


- 0 1 1) 14 8 8 8 0 
= о 4,10 10 10 14 6 1 
- € I2 10 101 42 34 9 0 
— 01410 8 4 2 44 % 
- 8.14: 4.4 4 4 4 (0 
- 9 10. 10 10 19 19 3174 0 
— 0 10 10 10 10 10 4 0 
— Г ПО + 4-5 2 0 
— о 10 10 4 410 10 0 
— 0 10 10 10 4 4 4 0 
= 9 14 2 4. 4 8 14 0 ME 
— 8 222 1 4.10 4 4 
- 0 013 4 4 4 4 0 
- 0-0 d ^4 4 .4 8 % 
эг | Ev UN: ИХ. лы; 4 0 
— nw. Ми Жу Л 44157740 
— 0 4 10 8 2 8 14 0 
- CO IO LM. O NS 0 
8 8 14 10 10 10 14 0 
- 0 0 14 8 8 8 14 0 
— 2 2 14 10 10 10 14 0 
- 0 0 14 10 14 8 14 0 
== 0 0 6 4 14 4 4 4 
— 0 0 14 10 10 14 2 14 
— 8 8 14 10 10 10 10 0 
- 0 4 0 4 4 4 6 0 
па ОЕ 25-70. 27:23 22 2-44 
- 8 8 10 12 12 10 10 0 
ца, 12 4 4:4 4 4 4 0 
- Г 2801 A „Ж, ЖЕ 00 
= 0 0 12 10 10 10 10 0 
- 0 0 14 10 10 10 14 0 
- 9 0 14 10 10 14 8 8 
- 0 2 14 10 10 м 2 1 
- 8 MEE 8 » Ж 8-0 
- 0 0 14 8 4 2 14 0 
cS 4 ы 404 4 56 0 
- 0: 0 10 10 10 19:15. 0 
- 8 0-10 19 13€ 10-40 
- 0 0 4 5 5 is 2 0 
— 9 0-10 139 4 4 10 0 
— 0 0 10 10 10 14 2 14 
- 8:-8 14. 2 4 8 14 0 
= 2 4.14 2 14 HM 45 0 
- 2 4 14 10 14 8 14 0 
- 2 4^ 9 % 4 4 € 0 
— 2 4 14 10 10 10 14 0 
— 2 4 10 10 106 14 15 0 


4230 IF az12 THEN PRINT "B'";CHR$ 
3;: GO TO 4100 
4240 GO SUB 2100 
4250 IF m>=31063 THEN GO TO 4580 
4260 GO TO 4100 
4500 POKE 23606,2: POKE 23607,8580 
ol "DESEA LEER OTRO TEXT 
4520 IF Ь$(1) ="5" THEN GO TO 400 


Estaba sentado en la puerta de su casa» cuando aparecutrün 
aquellos extraterrestres mastrandose agresiva y covardemente 


Primi 11 ti 
Gentes del lugar aseguran igualmente haber sido testigos de иав Хо 


importantes avistamientos Ventas 350.000 100 000 


Costes 1500 таш 


Cáceres, 25 de Mayo de 1984 


SUSCRIBASE 
POR TELEFONO 
ж más fácil, 

ж más cómodo, 

x más rápido 


(91) 4572617 


Servicio permanente durante las 24 horas del día 
“CONTESTADOR AUTOMATICO” 


SUSCRIBASE A 


Uy 


Tesh 02 0904 


Aprender inglés ha dejado de ser una cuestión de 
moda para convertirse en una «auténtica necesidad 
Para aprenderlo puede optar por muchos diferentes 
caminos, pero el que le ofrecemos con este programa 
es más divertido. Como no se lo vamos a vender. le 
podemos decir que con él no aprenderá gran cosa. 
pero seguro que pasa un rato agradable e instructivo. 

El programa le formulará preguntas sobre los 
verbos irregulares que previamente habrá de introdu- 
cir (se almacenan en una variable alfanumérica de tres 
dimensiones a fin de guardar los tres tiempos de este 
tipo de verbos: infinitivo, pasado y participio). Se 
puede seleccionar el tipo de pregunta (siempre el 
mismo tiempo, generalmente el infinitivo. o al azar), 


Autor: Alfonso Martin 16K 
SE ZL E 0-2 


Lo EIN 


ORDER 7: PAPER 8: INK Q 
7 INPUT " tienes los verbos i 
ntroducidos?"; INK 2,8 


IF $$2a's" THEN GO TO 200 
12 PRINT ,,"vamos a introducir 
Los gun te (05 vaya Pidiendo. 
Primero dime Cuantos hay” 
15 INP 
20 DIM 
30 FOR 
35 FOR 
40 PRI 
o “(сіп 
ado ND 
(ж3) 
52 INP 
55 PRIN 
60 NEXT 
61 PRI 
IAN 
52 FO 
63 IF 
гә 
64 NE 
65 CL: 
67 PR 
70 NE 
30 GO 
100 CL 
110 IN 
infil 
130 P 
o verd 
149 1 
142 Р 
145 P 
or_en 
150 1 
169 Il 
2 
170 8 
200 С 
205 Р 
5 verb 
rias Р 
rios € 
os pre 
os hut 
NK 4 
206 I 
207 G 
1922 C 
1010 1 


alguna Ғог-па en especial al pr 
ograma? (s/n) ";ss$ 
1020 IF s$z"n" THEN GO TO 1100 
1039 PRINT ,,"Сото le Llamo " 
1038 INPUT ya 
1040 GO TO 1110 
1100 LET u$s"verbos" 
iom PRINT ,,"l& voy a llamar "j; 
у 
1115 SAVE 9% 
1120 CL 
1130 PRINT "Atencion, nunca usar 
RUN"; INK S 
1132 бо TO ё 
2009 CL 
2912 PRINT "Te los voy à 
untando sal-teados. Hay v 
OSibilidades",,"1) Te pre 
t infinitivo y tu dic 
esto. "¡TAB 0,,,"2) Te pre 
valquier tiempo 1 tu d 
r&st AT 10,5;"Elige $ 
revas"; INK 3 
ERES INPUT ,,"Si te cansas 
ді 
2021 PRINT ,,"Quieres que te los 
pregunte to- dos O solo unos cu 
antos (1/2)" 
2022 INPUT t 
2024 GO SUB 4400 
2025 GO TO 20900«i«100 
2100 LET d=INT (RND+a)+f 
2105 CLS 
2110 PRINT ,,"Cuales son Los tie 
mpos del уегьо";а%(4,1); INK 3 
2115 INPUT "pasado";p9: PRINT P$ 
80 SUB sea 
2120 INPUT "participio";os: PRIN 
T 93 GO SUB 5052 
8132 IF рфбиад(4,2) AND 08:46(4,3 
› THEN GO TO 2170 
2140 LET q$a"Hay un error. vuelv 
е a pensarte-io ЖЭ 
PRINT 48) INK 0: FOR bal TO 30 
Q: NEXT b: 0 TO 2110 
2170 PRINT ,,"0.К., como dominas 
, $i no ca bias de Opinion te 
_voy_a seguir preguntando" 809 
505 2500 
2180 GO TO 2190 
2200 ERO d АФ (АМО Фа) +3: LET qu 
INT (RNO$*3)*1: CLS 
2210 PRINT "Cuales son los resta 
ntes tiemposdel verbo cuyo "j ("і 
nfinitivo" AND 9=1); (“pasado ' AN 
D 9=2);("participio” AND өа3);" 
es "¡TAB Q; +49) 
2220 IF gs HEN GO TO 2250: IF 
332 "HEN GG. TO 2290 e a 
2309 PRINT "Introduce el infinit 
КТАН INPUT k$: GO SUB 5100: PRI 
2240 PRINT "Introduce el pasado" 


INPUT P$: GO SUB 50200: PRINT P 


Бағ 1) Р 64,2 
TREN, E . 535 ә BRIN 96: 66 


8: 00 TO 2230 
$0*508"5$ el 881349, 
МРОТ p$: GO SUB 5092: RINT р 
255 PRINT "Introduce el artici 
: UT 06: GO SUB 5850: PRI 
48(4,2) AND o8»aS(d,3 

308 248; 
, Q$: GO SUB 4500: GO 


"Introduce el infinit 
IT Кф: PRINT k$: GO SUB 


5100 
2295 PRINT “Introduce el partici 
¡ZONE INPUT 08: GO SUB 5050: PRI 


os 

2297 IF 5558 1) AND 08548(4,3 

b ДЕН 80 4% 

2300 PRINT v as 80 SUB 4500: GO 
0 2298 


2350 PRINT "0,K., has хаети 
о 


IF INKEYS="3" THEN GO TO 20 
SES 25 RETURN 


TO 3 
(f-0+18+1),((d-1)4 
: NEXT 4 
881МТ (//18) THEN GO 


3500 
à he terminado"; ІМ 


3 $z"" THEN GO TO 351 
SEIS ет озо+1: CLS PRINT ув: 


RETUI 

4400 IF t«»1 THEN 40 TO Hm 
4410 LET asn: LET ful: RET 

4450 PRINT "introduce el Un. 
del verbo ini-cial y el final, 


re 
4 
ç 
2 


gu 
е 
іп 
) 
Р 


visa 951% 
IF qu-INT ауоӘ T 


q 
44 

1 "Verbo inicia 
"Verbo final?"; f: 


N 

4482 LET Ғз1%18жІМТ (40-1): LET 

8218: RET 

4509 FOR b=1 TO 400: NEXT b: CLS 
RETURN 


5009 LET qsLEN P$ 
5212 DIM z$(10-q): LET P$=P6$+ZS 
ETURN 


83 DIM 28(10-4) 
RETURN 
3 DIM z$(10-4): 
RETURN 


OCAASRCAw 
Jom. 


есхтаео--ғ-моасвтоаос 
Езе--Сооес»ееосшисе 
PURA MTI co 
con 
Бос! 
"e 


se ос өөө 
xn a 
эсуако--е-зеоаа>со 


ЖэЭэлзэсОоН ССФОЕОФСФ 
CANCHA 


зө» Эс «өө 


E 


es son los tiempos del verbo 


son los tiempos del verbo 


ve à pensarte- 


El coloso ov 


Ambientado en la célebre película de la que toma el 
nombre, este programa hará renacer en usted sus 
sentimientos más nobles para salvar a sus congéneres 
de una muerte tan segura como brutal. 

Un enorme fuego se ha declarado en uno de los 
rascacielos más importantes de la ciudad, avanzando 
rápidamente hasta alcanzar los últimos pisos. Ante la 
impenetrable muralla de fuego, sus inquilinos no ven 
otra solución que lanzarse al vacío. Y es aquí donde 
entra usted 

Su misión consiste en recogerlos antes de que ocurra 
el desenlace fatal y llevarles a un peculiar hospital en el 
que siempre deberá entrar despacio (nunca corriendo). 


Apresúrese а llevar todos los que pueda al hospital. 

pero no se descuide... ¡se le pueden cuer encima! 
Notas gráficas 
RHBCDEFGHIJKLMNOPQRSTU 
ЭЖЕ GHA шалгаж EX 

Autor: M." Belén Cortazar. 16K 


POKE 


RERD x: POKE 


Simpson 


Este programa utiliza la regla de Simpson para 
hacer integrales definidas. Si lo ejecuta directamente 
sólo hará representaciones gráficas. Para obtener la 
integral teclee RUN 1000. introduciendo posterior- 
mente la función a integrar (el argumento es la 
variable Х), A continuación se pregunta el intervalo de 
integración que quedará después resaltada en el 
gráfico. Una vez realizada la gráfica se pide el número 
de iteraciones para resolver la integral (diez es un 
número normal de iteraciones) 

Pruebe con los siguientes ejemplos 
Función: SIN X 
Intervalo: Xo=0 


Хі-РІ 


Julio Gómez Herrerc 16K 


Autor: 


LET x0=1 


4; "TELCEE MAXIM 
UT "XOz";N 
PUTELCEE MAXIM 
UT ү ‚М 
"LA_FUNCION 5 
Š INTERVALOS 
PRUSE 100: С 
DRAW 0,175: PLO 
INPUT "FUNCI 


NE n 
TO 7: RERD х: POKE 
NEXT n 
TO 7: READ х: РОКЕ 
i NEXT n 
TO 7: READ x: POKE 
NEXT n 
TO. 7: RERD x: POKE 
NEXT n 
TO 7: RERD x: POKE 
NEXT n 
TO 7: READ x: POKE 
NEXT n 
TO 7: RERD x: POKE 
NEXT n 
TO 7: READ x: POKE 
NEXT n 
Nm READ x: POKE 
n 
TO 7: READ x: POKE 
NEXT n 
TO 7: READ x: POKE 
NEXT n 
THEN FRI 
© 
, (UAL R$) 


55 IF 1 AND I>=x<0 AND Іс-хі 

EN OR D,-LIVAL R$) +57/M) 

60 NE Ї 

70 ҒО = -15 TO -N STEP -мга 
55 

75 L| 

su I AL R$)»M THEN PRIN 
TRATO $: 60 TO_100 

Эд Р 287/N) «127, (VAL AS) 
*87/M* 

35 I D I«zX1 AND I>=x0 


(VAL R$) жӛ7/М) 


THEN RETURN 
obreimpresion sizl 


THEN GO TO 27 


THEN 5ТОР 

) INPUT "FUNCION 
A$: LET R= 
1002 INPUT INTERVALO ";"Xàz";xQ 


74.49 
INTE. 
ЇНТЕ.2- 


Ө 


38 FOR n=Q TO_7: READ x: POKE 
: n 
“0 Ёо nau 18, fn RERD x: POKE 
a 59 ATA'B,24,24,126,126,24,24, 


52 DATA 2,43 534840453 
54 DATA 0,18 254 188, 


“56 DATA 2,174,164,164,36,36,0, 
Se DATA 0,232,168,232,168,174, 
¿50 “DATA 24,24,48,60,51,40,198, 
KZ DATA 24,24,48,60,51,48,72,1 


64 DATA (358,38,198,198 
86 DATA 9:188:248: 63,265,36,1 


‚195 
Pd DATA ipo Ai 
72 DATA 24,24,12,60,204,20,35, 


ҳ1=" 
1004 INPOT DESEAR REPRESENTACION 
GRAFICA?:51=1,N0 MU 
10056 IF MU-1 „THEN G SUB 10 
1010 ВЕЕР 1,7: INPUT "ITERRCIONE 


1-Х0) /2/ 
LET 2% ШЕТ Y=UA 


LET X=x+B: LET Y 
1050 LET ñ=Y*4+R: LET X=X+B: LET 
zURL 88 
1060 LET Науан LET Ғ:Ғ-1 
1972 IF Р‹›0 THEN GO ТО 1040 
3 


1030 LET С-Н» 

1099 PRINT "INTE.";R;"s'";C;" I 
ТЕ.а";Т: ВЕЕР 2,7 

1109 LET XíR*1)zC 

1115 IF RBS (X(R+1)-X(R))>=1E-7 
THEN LET R=R+1: LET T=Tx*2: LET F 
zT: GO TO 1080 

1120 FOR I=1 TO 5: BEEP .5,49: Р 
RUSE 5: NEXT I 


164 PRINT INK 7; 
6 PRINT AT 21 


97 
72 DATA 8,98,29,76,125,4,24.16 
32 DATA 8:184:113:63:38:136:14 
2 
ILLEROS: 


2 z 
26 DATA 195,34,20,24,240,24,52 BERE CRM 
78 DATA 16,149,84,89,114,118,6 SUIS oa a, 
177 LET y=0: PRINT PAPERS 2; INK 


,80 š 
888 DATA 32,164,148,197,109,111 7,8Т “Гү i$" s ALVADO: 
“180 BORDER 1: PAPER 1: INK 7: C 178 BRENN PARER A 


APER 2; INK 


a A 379 СЕТ 220: PRINT PAPER 2; INK 
104 PRINT /" Un 200 LE a 
o al hospitalse i 332 LET 86 8 
camilleros ainte 224 LET c 3 
эмче se і-гап БАН LET d t 
106 PRINT '" El 328 cer 1 а 
ndo el fuego alc 212 LET 9 =, 
piso,o cuando mue 214 LET h m 5 
camilleros de que 316 LET i 
108 PRINT '" Con 218 LET j 
gada,o con unsolo 220 LET àz25 
uedes recogera 10 225 LET кад: ET 10 
es que ir al hosp 249 IF хай THEN GO TO 600 
gar 105 A 250 GO TO 251+INT_(RND+3) 
otro camitle-ro. 251 LET К-7%!: GO TO 880 
109 PRINT FLRSH 252 LET кёв"Ү"!: GO TO 260 
сарана eb тб а? $88 GO ro ASÍ iNT (8037, 
QUA IF INKY Ee" THEN GO TO 12 a861 LET 8 Ч 44:9! бо TO а 
RINT 
Мера da da 8288 LET с4.7: LET 4ёз.8: GO TO 2 
TT ХЭСЭГ СО 6852 LET с=.?: LET 88.5: GO TO а 
Н гу dino o 1 8205 LET c=.7: LET 4.4: GO TO 2 | 
611° IF INKEYs="p" THEN GO TO 12 265 LET c».85: LET d=.25: GO TO 
CERE e (1/2) THEN PRINT 4335 LET cs.7: LET 48.15: GO ТО 
т На вий NT, (n/2) THEN PRIN 882 LET czai LET de 
p" E LET n» 
180 BEÉP .2,1840/2 290 PAINT Ar INT R INT UI 
121 NEXT n 292 LET tested: IF t=600 THEN co 
a BRINT ат 0,11; "MENS a294, RA INT (1/2) THEN LET t 
PRINT "2" Teclas de moyimie 
Tto а n Ш IZQUIERDA Еді 


5138 PRI UL 120 
E 

Plon" Lo 

132 PRINT "ARI : ОЕР 


135 PRINT *" Para desocupar (а 
Camilla, re-" "coger Camillero 5 
S, PULSA ё con ца" "camilla den se 
БОХ ЧАГ ЛЭН Hs 
A DEN SUERTE 1; p М 
а PRIN 1,7" БІ 
Y atc 
PRUSE 0 mue 
(150 BORDER 5: PAPER 5: INK 1: C que 
152 FOR 18: PRINT ЇМК 4; Con 
154 Br тат 18:07 2010 
Е € PRIN A o; ин hospi 
56 PRINT ¿AT 6,24:" шинжээ dos, 


"Ass FoR nz7 PR ; 
PD ES PRA. MEN di 
цэл ЁС ER AA 5i m Para continuar pulsa P 
DN hir INK 7;RT 19,24; "NENNEN 


Peus 


BSE HAT, 21, INT n;k$; PRINT RT 2 1 

3396: вий OFNT 1178) THEN LET гыт пы ET 1з2+1: PRINT PA 
E VETT, ызын БЕН a; їмк 7; RT 4430/2: GO то 88 
P Отан паче usia 

б 
Selle нее Tg BEN E E8 888 88:87 AT INTA INT вн": 
E NITE THEN PRINT INK 250 OR 0:59 ТО 45 STEP 2.5: ВЁЕР 11, 
388 IF "1,508 THEN PRINT INK 828 695 iR 0-4 ямр 2555 THEN PRINT 
TO 1 ЫТ 2,4, 08 БИДЭН, AT 7,11; ENHORABUENA" -P 
4 4 Пы, > N ,9;"Has salvado "jy; 
218.18. {OES 07 A 11,8: 41488 sin perder" ,AT 16711 
"б" “сай tros" 
311,16 INKEY6="0" AND a»9 THEN 26 E Si nuo хр тиен PRI, 
, ¿"Has realizado" ,9; 
| 222 E Keven КАНЫ ә КЕБ НЕН una buena ope-";AT 11,9; "racion, 

ЗІЗ IF INKEY$="P" AND ac24 THEN Din чаза: Пг 13,95: Pedi do eas 

LET a=a+a i 15,8 innetesa E A M 

315 IF a/2=INT (a/2) THEN PRINT 515 45,225 THEN PRINT ñ 2102 

AT 20 -3; Solo аздт ¿A Р 4 аа 
7522 8 НА НТЭЙ (2/2) THEN PRIN а АЕ 

"bilid 
322 IF INT n=15 THEN LET dae 8: Š 
388 27 INT 8228 ANG IND nii амр 5i5 IF y=1 THEN PRINT RT 9,21; 
= 21 = 
To dedi hier RE ав -AM ob КЕЗЕДИ СЫ ЖАТЫ 
Vida" 

365 IF INT n=20 AND INT n=a+1 T 20 PRINT RT 17,10;"PRRR JUGAR 
HEN LET kz2: LET афзе$: LET bef Ё 
Барлы EP арт, ЭЭ 4883 PRINT AT 19,6;"INSTRUCCIONE 

+1; 2 : 
QD Epi d: AR UNDE AVE M 
2 

368 IF INT n-20 AND INT nea-1 T 8:15 5 

HEN LET кзг 2687 ES 8235. 12520652 (074) THEN LET t 
214 4 s 
HAE TE REL: 2=2+2 6388 ENKEY Sets? THEN GO TO 15 

PRINT PAPER 2; INK 7; RE 43813) a 5 
99.10 249 636 IF INKEY$="i" THEN GO TO 10 

370 IF INKEYS="1" AND k=1 AND a ә 
125 THEN LET ав. З: LET b 640 PRINT INK 
$=" ; ШЕТ кай” LET yzy+2: 1415887. 16,4 
PRINT PAPER 2; INK 7;RT 8,394 i$,6i 15,01 14,5 

375 IF INKEYS="1" ӨМб k=2 ANb a S.i; tg AT 6,621 
027 THEN LET азы” ОЧ Ы gu 2,1, t& 

25 E E ы 
PRINT PAPER 31 INK“; Q 317 4S NEXT n 

390 IF INT n=20 THEN PRINT INUE 550 GÖ TO 630 


Teclas de movimiento: 

B IZQUIERDA DERECHA 
Ю+ШШЛЕШЕШИШ: | IZQUIERDA RAPIDA 
B NER | DERECHA RAPIDA 


Para desocupar la camilla,o re- 
coger camilleros,PULSA con la 
Camilla dentro del hospital 


CRMILLEROS: 3 
SALVADOS: 2 
MUERTOS: 3 


9 X X BUENA SUERTE y ¥ X 


Оллоо 200041006 


DDD es el nor ama, siglas que 
responden a Decodi iones y gracias al 
cual se representa en pantalla un circuito lógico 
formado con cuatro puertas NOT y cuatro puertas 
1ND que posee dos entradas. es decir, que simula un 
bus de dos vías y cuutro salidas. 

Desde el programa se coloca en el bus la entrada 00, 
01, 10u П, en función de lo cual se activará la salida 0, 
. 3. Por los hilos se simula el movimiento de los bits 
y en las puertas AND aparecen los valores recibidos 

Es realmente gracioso contemplar el movimiento de 
los bits por el circuito. Muy indicado para fines 
didácticos y especialmente para los amantes de la 
circuitería 


Notas. gráficas 
ABCDEFGHIJKLMNOPORSTU 
814-14-1-4КЦ,МмОРОВ5Т 


Autor: Manuel G. 1 Chumilla 16K 


19 REM * 

20 REM Icos 

38 REM * 

40 FOR i= RERO a8: FOR 
J=8 TO 7 

50 READ x: POKE USR а8,/,х 

58 NEXT j XT i 

a2 DATA ` ,0,28,38,42,50,28 
"71 DAT :3:25:543:38:8 
278 :8:38:242:28:8, 
8 
272 ,0,28,255,28,8, 
47% ,28,42,73,201,8,8 
’ 75 8,8542 
2% TP LE: ши 4? 

7? 3 

78 8:2:248:8 

30 +++ 

20 el circuito 
199 LEE! 

110 : DRAY 0,-87: Р 
L 48,0: байы O, 
51 ы ә: D 

-38: б 


178 PRINT BT a aS CHRS b; FOR. і 
To 880: NEXT Í! RINT BA Aras 


Ө-ӨРЮ rn бӨӨ6Ө ~ ббс 


¡"Entrada de 
{ IF ах48 
$ à: PRINT 


о 


e 
TURNO ENDE = ^ 


ai 

Sanar 3928.4: 
5 THEN PRINT RT 8,26; " 
Vue PRINT RT 10,26; 


r 


310 IF i«2 THEN PRINT RT 10,26; 


NEXT i 
¿330 PRINT RT 8,20; "+"; AT 10,22; 


FOR 1 TO 5: PRINT RT 841 
“085408 2o; PRINT RT өні, 


IF is2 THEN PRINT RT 10,20; 
IF i»3 THEN PRINT RT 11,22; 
IF іші THEN PRINT RT 11,22; 


NEXT 

LET ха144: IF аз48 THEN LET 

x=14 

360 LET раза, LET v=b+96; LET < 

5га FOR i=l TO $: PRINT ЯТ 10,2 
20-i USE 26: 


PAINT E DP DET EE 
400 IF 1з8 THEN PRINT RT 10,20; 


“Lo 


NE 
420 PRINT! RT 6,14; " 


y 


+ "¡AT 10,16; 


ENI RADH 
vu 


LELUD IF ICADOR 
DE DIRECCIONES 


3ALIDAS 


ENTRADA 


DECODIFICADOR 
DE DIRECCIONES 


SALIDAS 


Tsg FOR isi ТО 3: PRINT НИ X 
14; " A" ;RT 10+i SUP PA 

18 тат” AT 23111425 ar 1831, 
“аа IF ізге THEN PRINT RT 10,14; 


50 NEXT i 
сва аш Мз144: IF b=48 THEN LET 


56871180 LET qui: LET хяа» 
ізі 28 5: Da AT 12,1 
ar "+7: PAUSE 20: 
О 12 8,14-і; 


8: PRINT RT Өзі, 
: PRINT ВТ 891,8: 


“28Т 14,19; 
pitr at N) 


ЇЕ аз48 THEN LET 


ENTRADA 


DECODIF ICADOR 
DE DIRECCIONES 


SALIDAS 


ENTRADA 


DECODIFICADOR 
DE DIRECCIONES 


SALIDAS 


Sao БЕП у=144: IF Ба48 THEN LET 
Ne LET ра120: LET даф: GO SUB 1 
“Sta PRINT 81) вт: 20) “насаһов ot 
$50 IF INKEY wt FH HEN GO gg 559 
5 Y 6=""s' THEN GO SUB 1 
LS : STOP 
RAW Q,-1: DRAW -6,0: LET P 
ol 
L. 


FOR іші TO 5: DRAW рж (13-28% 
ET P=-P: DRAW p,-1: NEXT 


RRU $5 FE ORAY Q,-9: DR 
DRAW ӘРІ: DRAW 0,6: 


AT 19:00988 X;RT 15, 


899. EE FLASH 1 
T 19, ja: FLASH 0: 


ч 
8 
=1 TO 4: PRINT AT 19,6 
RINT ЕТ, 15,88144:" 
PRINT RT 2,26)! ы 


I 
ds 
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zx 
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Con el nacimiento de Todospe- 
ctrum asistimos también al del intré- 
pido Gusanez. una mascota peculiar 
que pondrá la nota de humor en las 
difíciles. complicadas y a veces pesa- 
das operaciones con el Spectrum 
Deje que nuestro Gusanez. el de 


o 
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5 
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вававоав 


ІМАСІМО QUE ESTARAS 
LEYENDO EL LISTADO DE 
Mi PROGRAMA... 


БН, 8:48,-а 
4 


todos. irrumpa en su monitor o tele- 
visor con este pequeño y sencillo 
programa. 

A Gusanez le van a ocurrir todo 
tipo de aventuras. unas inverosimiles 
otras arriesgadas. pero será el humor 
la nota predominante de las acciones 


155 DRAW 


-30,20,-1 
El 


145 PLOT 205,48: DRAW Q 
1250 PLOT 207,45: DRRU -15,-10,- 


que protagonizará gusanez en esta 
última página de Todospectrum. 
Nuestra mascota está hecha para 
divertir. su creador es un joven ena- 
morado del Spectrum. а| que ha 
hecho trabajar duramente para dar 
cuerpo a su obra. 
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La versión española de Popular Computing 


LA REVISTA QUE INTERESA TANTO AL AFICIONADO COMO AL PROFESIONAL 


Una publicación que 
informa con amenidad 
acerca de las novedades 
en el campo de las 
computadoras personales. 


ORDENADOR POPULAR, 
la revista para el 
aficionado a la 
informática. 


Ya está a la venta 
pa ыс 


Cómprela en su kiosco habitual o solicítela a: 


Bravo Murillo, 377 
Tel. 7339662 
28020 - MADRID 


GARANTIZAMOS 
EL CRECIMIENTO 


DE TU 
SPECTRUM 


Si tienes un SINCLAIR ZX SPECTRUM de 16 K y deseas ampliarlo a 48 K ahora puedes 
hacerlo con toda garantía. 
Acude a tu Concesionario Autorizado INVESTRONICA y en breve espacio de tiempo 
dispondrás de tu Spectrum con MAS POTENCIA. 
Además INVESTRONICA ampliará por tres meses la garantía de tu equipo, 
independientemente de la fecha de adquisición y te obsequiará con una 
Cinta de Demostración de 48 K. 


IMPORTANTE: 8 
A siqan ka productos SINCLAR exa la Amplia, 
TAEA SERATAN тск y ave para ahora, tu SPECTRUM 
т плдш de 16 K a 48 К. 


técnico a todos aquellos aparatos que carezcan 
de la correspondiente garantia. 


DE VENTA EN CONCESIONARIOS 
AUTORIZADOS. 


Con garantía... 
Con más garantía. 


